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This reference publication contains specifications 
for the IBM System/360 Disk and Tape Operating 
Systems Assembler Language (including macro 
instructions and conditional assembly facilities) . 

The assembler language is a symbolic 
programming language used to write programs for 
the IBM System/360. The language provides a 
convenient means for representing the machine 
instructions and related data necessary to program 
the IBM System/360. The IBM System/360 Disk and 
Tape Operating Systems Assembler Programs process 
the language and provide auxiliary functions 
useful in the preparation and documentation of a 
program, and include facilities for processing 
macro instructions. 

Part 1 of this publication is an introduction 
to the assembler language. 

Part 2 describes the basic functions of the 
assembler language. 

Part 3 describes the conditional assembly and 
macro facilities in the assembler language. 





PREFACE 



This publication is a reference manual for 
the programmer using the assembler language 
(including macro definitions and condition- 
al assembly facilities) . This publication 
also contains information peculiar to the 
IBM System/360 Disk and Tape Operating Sys- 
tems for the D and F assembler. 

Part 1 of this publication presents 
information common to all parts of the 
language. Part 2 contains specific infor- 
mation concerning the symbolic machine 
instruction codes and the assembler program 
functions provided for the programmer* s 
use. Part 3 of this publication describes 
the conditional assembly and macro facili- 
ties in the assembler language. 

Appendixes A through P follow Part 3. 
Appendixes A through F are associated with 
Parts 1 and 2 and present such items as a 
summary chart for constants, instruction 
listings, character set representations, 
and other aids to programming. Appendix 
G contains macro facility summary charts, 
and Appendix H discusses table capacities 
for various elements of the language. Appen- 
dix I is a sample program and assembler 
listing description. Appendix J is a fea- 
tures comparison chart of the IBM System/360 
assemblers. Appendix K gives examples of the 
cards needed for assembler runs . Appendix L 
contains a description of how another ver- 
sion of the assembler can be included in the 
core-image library. Appendix M describes 
the output produced by the assembler. 
Appendix N explains the diagnostic error 
messages that can be issued by the assembler. 
Appendix contains self-relocating program 
techniques. Appendix P contains sample macro 
definitions. 

Prerequisite for a thorough understanding 
of this publication is a basic knowledge of 



IBM System/360 machine concepts. The pub- / 
lications most closely related to this are: 

1. IBM System/360 Principles of Operation , 
Order No. GA22-6821. 

2. IBM System/360 Disk Operating System : 
Data Management Concepts , Order No. 
GC24-3427, or 

IBM System/360 Tape Operating System : 
Data Management Concepts , Order No. 
GC24-3430. 

3. IBM System/360 Disk Operating System : 
Supervisor and Input/Output Macros , 
Order No. GC24-5037 or 

IBM System/360 Tape Operating System : 
Supervisor and Input/Output Macros , 
Order No. GC24-5035. 

4. IBM System/360 Disk Operating System : 
System Control and System Service Pro- 
grams , Order No. GC24-5036 or 

IBM System/360 Tape Operating System : 
System Control and System Service Pro- 
grams , Order No. GC24-5034. 

5. IBM System/360 Disk Operating System : 
System Generation and Maintenance , 
Order No. GC24-5033 or 

IBM System/360 Tape Operating System : 
System Generation and Maintenance , 
Order No. GC24-5015. 

6. IBM System/360 Disk and Tape Operating 
Systems Utility Macro Specifications , 
Order No. GC24-5042. 

Titles and abstracts of other related 
publications are listed in the IBM 
System/360 Bibliography , Order No. GA22-6822 
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PART 1 — INTRODUCTION TO THE ASSEMBLER LANGUAGE 
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SECTION 1: INTRODUCTION 



Computer programs may be expressed in 
machine language, i.e., language directly 
interpreted by the computer, or in a sym- 
bolic language, which is much more meaning- 
ful to the programmer. The symbolic lan- 
guage, however, must be translated into 
machine language before the computer can 
execute the program. This function is 
accomplished by an associated processing 
program called an assembler or a compiler. 

Of the various symbolic programming 
languages, assembler languages are closest 
to machine language in form and content. 

The assembler language discussed in this 
manual is a symbolic programming language 
for the IBM System/360. It enables the 
programmer to use all IBM System/360 
machine functions, as if he were coding in 
IBM System/360 machine language. 

A program written in the assembler 
language will normally consist of three 
types of instructions: machine instructions, 
assembler instructions, and macro instruc- 
tions . They are all coded in a language 
that can be interpreted by the assembler 
processor program. Machine instructions are 
transformed into machine language instruc- 
tion by instruction. This language can be 
directly interpreted by the machine. Their 
functions are not described in this manual. 
Refer to IBM System/360 Principles of Opera- 
tion (GA22-6821) . 

Assembler instructions are used by the 
assembler during processing to manipulate 
the source program written in the assembler 
language. They are described in this manual. 

IBM-supported macro instructions provide 
easy access to the control programs supplied 
by the system under which the installation is 
running. They are described in IBM 
System/360 Tape Operating System Supervisor 
and Input/Output Macros (GC24-5035) and in 
IBM System/360 Disk Operating System Super - 
visor and Input/Output Macros (GC24-5037) . 
The user can also write his own macro defi- 
nitions to obtain easy access to precoded 
sections of code. Writing macro definitions 
is covered in this manual. 

Under DOS , two assemblers — the D 
assembler and the F assembler are available, 
TOS offers only the D assembler. Two vari- 
ants of the DOS and TOS D assemblers are 
available. Requirements of the different 
assemblers are discussed below. 

MACHINE FEATURES REQUIRED 

A minimum of 16,384, 24,576, or 65,536 
bytes of main storage as detailed below: 
16,384 (16K) bytes of main storage, of 
which at least 10,240 contiguous bytes 



must be available to the assembler. This 
is the core requirement for the 10K vari- 
ant DOS and TOS D assemblers. 
24,576 (24K) bytes of main storage, of 
which at least 14,336 contiguous bytes 
must be available to the assembler. This 
is the core requirement for the 14K 
variant DOS and TOS D assemblers. 
65,536 (64K) bytes of main storage, of 
which at least 45,056 contiguous bytes 
must be available to the assembler. 
This is the core requirement for the 
44K DOS F assembler. 

NOTE: Additional storage, available to any 
of the assemblers, is used to expand assem- 
bler tables. For details on how to call a 
specific assembler see Appendix K and the 
DOS and TOS System Generation publications 
(listed in Preface) . 

Standard instruction set 

One I/O Channel (either multiplexor or 

selector) 

One Card Reader (1442N1, 2501, 2520B1, 

or 2540) 1 

One Card Punch (1442N1, 1442N2, 2520, 

or 2540)1, if punched output is 

desired 

One Printer (1403, 1404 - continuous 

forms only, or 1443)1, if a printed 

listing is desired 

One 1052 Printer-Keyboard 

One 2311 or 2314 Disk Storage Drive. 
This has the DOS resident system pack. 

or 
One 2400-series Magnetic Tape Unit 
(either 7-track or 9-track) . This has 
the TOS resident system. 

Three work files. Under the DOS D Assem- 
bler, 10K Variant: either three disk 
storage extents or three magnetic tape 
units. The devices used must be all of 
the same type; i.e., three magnetic tape 
units, three 2311 disk storage extents, 
or three 2314 disk storage extents. 
Under the DOS D Assembler, 14K Variant, 
and the DOS F Assembler: any combination 
of disk storage extents and/or magnetic 
tape units. The disk storage devices 
used need not be of the same type as that 
of SYSRES. 

Under the TOS D Assembler, 10K and 14K 
Variants : three magnetic tape units . The 
devices used must be of the same type as 
that of SYSRES. 



A 2400-series Magnetic Tape Unit may be sub- 
stituted for this device. (It may be 7-track 
or 9-track. If 7-track is used the data con- 
version feature is required and the tape must 
be set converter on, translator off, odd 
parity.) The 1052 Printer-Keyboard must be 
operable if device assignment is tape. 
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The allowable disk storage devices are the 
2311 and 2314 Disk Storage Drives. The 
allowable magnetic tape units are 2400- 
series Magnetic Tape Units (either 7- 
track or 9-track: if 7-track, the data 
conversion feature is required and the 
tape must be set converter on, translator 
off, odd parity) . 

Under the DOS D Assembler, 10K Variant, 
only the system source statement library 
is supported. Under the DOS D Assembler, 
14K Variant, and the DOS F Assembler, a 
private source statement library is sup- 
ported. Under the TOS D Assembler, 10K 
and 14K Variants, the standard private 
library is supported. The device used 
for the private library must be of the 
'same type as that of SYSRES. 

For the 10K DOS and the 14K TOS D assem- 
blers, the assemble-and-execute option is 
an alternative to the DECK option; both are 
not supported for the same assembly. For 
the 14K DOS D assembler and for the F assem- 
bler, both options are supported in the 
same assembly. If the assemble-and-execute 
option is chosen, SYSLNK is a 2400-series 
Magnetic Tape Unit (9-track or 7-track with 
the data conversion feature) for the tape- 
resident system, or a 2311 or 2314 Disk 
Storage extent (which may be on the system 
resident device) for the disk-resident 
system. 

If, under the F assembler and the 14K 
DOS D assembler LINK or CATAL options are 
chosen, the I/O requirements for both must 
be met. 



COMPATIBILITY 

Within the Disk and Tape Operating Systems 
the assemblers can be used on System/360 
Models 30, 40, 50, 65, and 75, provided 
that main storage and input/output require- 
ments are satisfied. The assemblers (disk 
and tape) will both accept the same source 
language input and produce identical object 
output . 

The IBM System/360 Disk and Tape Opera- 
ting Systems Assembler assembles source pro- 
grams written in the IBM System/360 Basic 
Programming Support Basic Assembler Lan- 
guage, the Basic Programming Support Assem- 
bler (8K Tape) Language, the IBM 7090/7094 
Support Package for IBM System/360 Assembler 
Language, and the IBM System/360 Basic 
Operating System (8K Disk) Language, with 
the following exceptions: 



1. The XFR assembler instruction, which is 
considered an invalid mnemonic opera- 
tion code in DOS/TOS Operating Systems 
is not allowed. 



2. Additional cards may be required in 
macro definitions (if used by the 
source program) to satisfy DOS/TOS 
Operating Systems macro requirements. 

3. System macro instructions are changed, 
where necessary, to conform with the 
proper DOS/TOS requirements. 

4. An MNOTE assembler instruction whose 
operand entry consists solely of a 
message enclosed in apostrophes is 
given a severity code of one. 

5. AIF operand entries must not contain 
explicit binary zeros or ones. 

The DOS/TOS D assembler language is a 
subset of the Operating System assembler 
language. The DOS F assembler language 
implements the full Operating System assem- 
bler language with the exception of DXD and 
CXD statements and the Q-type (DC or DS) 
constant. Source programs written in DOS/ 
TOS assembler language will be acceptable 
to the Operating System assemblers provided 
that system macro instructions are changed, 
where necessary, to conform with the proper 
Operating System requirements. Erroneous 
source input may be treated somewhat dif- 
ferently by D and by F. 

V-type address constants which reference 
external data may be invalid under the 
Operating System Assembler if the program 
is segmented into an overlay structure. 

Note : The assignment, size, and order- 
ing of literal pools may differ among the 
assemblers. 

Differences in conditional assembly 
instructions for IBM System/360 assemblers 
are described in Section 10 of this pub- 
lication. 



THE ASSEMBLER LANGUAGE 



The basis of the assembler language is a 
collection of mnemonic symbols which rep- 
resent: 

1. IBM System/360 machine language opera- 
tion codes. 

2. Operations (auxiliary functions) to be 
performed by the assembler program. 



The language is augmented by other sym- 
bols, supplied by the programmer, and used 
to represent storage addresses or data. 
Symbols are easier to remember and code 
than their machine language equivalents. 
Use of symbols greatly reduces programming 
effort and error. 



Machine Operation Codes 



The assembler language provides mnemonic 
machine instruction operation codes for all 
machine instructions in the IBM System/360 
Universal Instruction Set, and extended 
mnemonic operation codes for the condi- 
tional branch instruction. 

Assembler Operation Codes 



The assembler language also contains 
mnemonic assembler instruction operation 
codes, used to specify auxiliary functions 
to be performed by the assembler program. 
These are instructions to the assembler 
program itself and, with a few exceptions, 
do not result in the generation of any 
machine language code by the assembler 
program. Certain assembler instructions, 
i.e., conditional assembly instructions, 
affect the order of source statement assem- 
bly and macro generation or the content of 
generated instructions. 



Macro Instructions 



The assembler language enables the program- 
mer to define and use macro instructions. 
Macro instructions are represented by an 
operation code which, in turn, actually 
stands for a sequence of machine and/or 
assembler instructions that accomplish the 
desired function. 

Macro instructions used in preparing an 
assembler language source program fall into 
two categories: system macro instructions, 
provided by IBM, which relate the object 
program to components of the Basic Operat- 
ing System, and macro instructions created 
by the programmer specifically for use in 
the program at hand, or for incorporation 
in a library, available for future use. 

Programmer- created macro instructions 
are used to simplify the writing of a pro- 
gram and/or to ensure that a standard 
sequence of instructions is used to accom- 
plish a desired function. 

For instance, the logic of a program may 
require the same instruction sequence to be 
executed again and again. Rather than code 
this entire sequence each time it is need- 
ed, the programmer creates a macro 
instruction to represent the sequence, and 
then each time the sequence is needed, the 
programmer simply codes the macro 
instruction statement- During assembly, 
the sequence of instructions represented by 
the macro instruction is inserted in the 
object program. 



Part 3 of this publication discusses the 
conditional assembly and macro facilities. 



THE ASSEMBLER PROGRAM 



The assembler program, also referred to as 
the "assembler," processes source 
statements written in the assembler lan- 
guage- The assembler is separated into an 
assembly section and a conditional assembly 
and macro generation section. 



The Macro Generation and Conditional 



Assembly Section 



Before source statements can be translated 
into actual machine language, macro 
instructions and conditional assembly 
statements within the source program must 
be processed. The source program is read. 
Any programmer macro definitions which 
appear before the main portion of the pro- 
gram are stored for use when the macro is 
referenced- (System macro definitions are 
retrieved from the source statement library 
and handled in the same way.) 

The main portion of the program is then 
processed, whenever macro generation or 
conditional assembly is required, the gen- 
erated or conditionally assembled text is 
inserted in the original source program. 
The resultant augmented source program is 
ready for input to the assembly section. 



The Assembly Section 



processing a source program involves the 
translation of source statements into 
machine language, the assignment of storage 
locations to instructions and other ele- 
ments of the program, and the performance 
of the auxiliary assembler program func- 
tions designated by the programmer. The 
output of the assembler program is the 
object program , a machine language equiva- 
lent of the source program. The assembler 
program furnishes a printed listing of the 
source statements and object program state- 
ments and additional information useful to 
the programmer in analyzing his program, 
such as error indications. The object 
program is in the format required by the 
linkage editor component of DOS/TOS. 

The amount of main and secondary storage 
allocated to the assembler program for use 
during processing determines the maximum 



Introduction 



number of certain language elements that 
may be present in the source program- For 
a discussion of these dependencies, see 
Appendix H . 



PROGRAMMER AIDS 



parts called control sections . Control 

sections may be added or deleted when link- 
age editing the object program. Because . 
control sections do not have to be loaded 
contiguously in storage, a sectioned pro- 
gram may be loaded and executed even though 
a continuous block of storage large enough 
to accommodate the entire program may not 
be available. 



The assembler program provides auxiliary 
functions that assist the programmer in 
checking and documenting programs, in con- 
trolling address assignment, in segmenting 
a program, in data and symbol definition, 
in generating macro instructions, and in 
controlling the assembly program itself. 
Mnemonic codes, specifying these functions, 
are provided in the language. 

Variety in Data Representation; Decimal, 
binary, hexadecimal, or character represen- 
tation of machine language binary values 
may be employed by the programmer in writ- 
ing source statements. The programmer 
selects the representation best suited to 
his purpose. 

Base Register Address Calculation: As 
discussed in the IBM System/360 Principles 
of Operation manual, the IBM System/360 
addressing scheme requires the designation 
of a base register (containing a base 
address value) and a displacement value in 
specifying a storage location. The assem- 
bler assumes the clerical burden of calcu- 
lating storage addresses in these terms for 
the symbolic addresses used by the program- 
mer. The programmer retains control of 
base register usage and the values entered 
therein. 

Relocatability ; The object programs pro- 
duced by the assembler are in a format 
enabling relocation from the originally 
assigned storage area to any other suitable 
area. 

Sectioning and Linking; The assembler 
language and program provide facilities for 
partitioning an assembly into one or more 



The linking facilities of the assembler 
language and program allow symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 
separately assembled programs. This per- 
mits reference to data and/or transfer of 
control between programs. A discussion of 
sectioning and linking is in Section 3 
under Program Sectioning and Linking . 

Program Listings; A listing of the source 
program statements and the resulting object 
program statements may be produced by the 
assembler for each source program it assem- 
bles. The programmer can partly control 
the form and content of the listing. 

Error Indications : As a source program is 
assembled, it is analyzed for actual or 
potential errors in the use of the assem- 
bler language. Detected errors are indi- 
cated in the program listing. 



ASSEMBLER - DOS/TOS RELATIONSHIPS 



The assembler program is a component of IBM 
disk and tape operating systems and func- 
tions under their control. DOS/TOS provides 
the assembler with input/output, library, 
and other services needed in assembling a 
source program. In a like manner, the 
object program produced by the assembler 
will normally operate under control of DOS/ 
TOS and depend on it for input/output and 
other services . In writing the source pro- 
gram, the programmer must include statements 
requesting the desired functions from DOS/ 
TOS. (See the Supervisor and Input/Output 
Macros publications listed in the Preface . ) 
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SECTION 2: GENERAL INFORMATION 



This section presents information about 
assembler language coding conventions, 
assembler source statement structure, 
addressing, and the sectioning and linking 
of programs. 



The entries (i.e., coding) composing a 
statement occupy columns 1-71 of a 
statement line and, if needed, columns 
16-71 of successive continuation lines. 



ASSEMBLER LANGUAGE CODING CONVENTIONS 



Continuation Lines 



This subsection discusses the general cod- 
ing conventions associated with use of the 
assembler language. 



Coding Form 



A source program is a sequence of source 
statements that are punched into cards. A 
standard assembler card is shown in Figure 
2-2. These statements may be written on 
the standard coding form, X28-6509 (Figure 
2-1) , provided by IBM. One line of coding 
on the form is punched into one card. The 
vertical columns on the form correspond to 
card columns. 



When it is necessary to continue a state- 
ment on another line the following rules 
apply. 

1. Enter any nonblank character in the 
continuation column (end column plus 
one) of the statement line. 

2. Continue the statement on the next line, 

starting in the continue column. 
Columns to the left of the continue 
column must be blank. 

One continuation line is allowed for the 
D assembler and two continuation lines are 
allowed for the F assembler, except for 
source macro-instructions and macro proto- 
type statements, which may have more than 
one continuation line (see Part 3) . 



Space is provided on the form for pro- 
gram identification and instructions to 
keypunch operators. None of this informa- 
tion is punched into a card. 



The body of the form (Figure 2-1) is 
composed of two fields: the statement 
field,' columns 1-71, and the 
identification-sequence field, columns 
73-8 0. The identification- sequence field 
is not part of a statement and is discussed 
following the subsection Statement Format. 



Statement Boundaries 



Source statements are normally contained in 
columns 1-71 of statement lines and columns 
16-71 of any continuation lines. There- 
fore, columns 1, 71, and 16 are referred to 
as the "begin," "end," and "continue" 
columns, respectively. This convention may 
be altered by use of the Input Format Con- 
trol (ICTL) assembler instruction discussed 
later in this publication. 
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Figure 2-1. Coding Form 



00000000 

11 1 11 1 1 1 

22222222 
33333333 
44444444 
55555555 
SGGGSG6E 
77777777 
S8888888 
9939S999 



00000 
11111 
22222 
33333 
44444 
55555 
GSGSE 
77777 
1888! 
99999 



00000 
11111 
22222 
33333 
44444 
55555 
SESEE 
77777 
88888 
39999 



00000 
11111 
22222 
33-333 
44444 
55555 
E8EGE 
77777 
88888 
99999 



00000 
11111 
22222 
33333 



0000 

11111 

22222 
33333 



00000 
11 II I 
22222 
33 333 



00000 

11111 

22222 
33333 



00000 

11111 

22222 
33333 



00000 
11111 
22222 
33333 



IBM SYSTEM/360 

STANDARD ASSEMBLER CARD 



SGB6S 

77777 

88888 

9999 



G6S6G 
77777 
88888 
99999 



6G6GS 

7 7 7 7 7 

8 8 8 8 8 
39999 



6EG6G 
77777 

3 8 888 
99999 



66666 
777 77 
88888 
39999 



5EE6E 
7 7 7 7 7 

88888 
39999 



00000 
11111 
22222 
33333 
44444 
55555 
SGCEE 
77777 
8SES8 
39999 



00000 
11111 
22222 
33333 
4 4 4 4 4 
55555 
EEEE6 
77777 
88888 
99999 



000000 
11111 
222222 
333333 
444444 
555555 
S6EEG6 
777777 
888888 
399999 



11111 
22222 
33333 
44444 
55555 
EGGGE 
77777 
88888 
99999 



Figure 2-2. Punched Card Form 
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Statement Format 



There are two types of 

statements — instructions and comments. 

Instructions may consist of one to four 
entries in the statement field. They are, 
from left to right: a name entry, an 
operation entry, an operand entry, and a 
comments entry. These entries must be 
separated by one or more blanks, and must 
be written in the order stated. Total 
statement size is limited to 187 charac- 
ters. If this limit is exceeded, the 
assembly listing may be incorrect for that 
statement. 

The coding form (Figure 2-1) is ruled to 
provide an eight-character name field, a 
five-character operation field, and a 
56-character operand and/or comments field. 

If desired, the programmer may disregard 
these boundaries and write the name, 
operation, operand, and comment entries in 
other positions, subject to the following 
rules: 

1. The entries must not extend beyond 
statement boundaries (either the con- 
ventional boundaries, or as designated 
by the programmer via the ICTL 
instruction) . 

2. The entries must be in proper sequence, 
as stated above. 

3- The entries must be separated by one or 
more blanks. 

U. If used, a name entry must be written 
starting in the begin column. 

5. The name and operation entries must be 
completed in the first line of the 
statement, including at least one blank 
following the operation entry - 

« 
A description of the name, operation, 
operand, and comments entries follows: 

Name Entries: The name entry is a symbol, 
eight characters or fewer, created by the 
programmer to identify a statement. A name 
entry is usually optional, but, if present, 
must be entered with the first (or only) 
character appearing in the begin column. 
If the begin column is blank, the assembler 
program assumes no name has been entered. 
Blanks must not appear within a name entry, 
whether the symbol was introduced directly 
by the programmer or indirectly by condi- 
tional assembly or macro generation. 

Operation Entries: The operation entry is 
the mnemonic operation code specifying the 
desired machine operation, macro, or assem- 



bler function. An operation entry is man- 
datory and must appear in the first state- 
ment line, starting at least one position 
to the right of the begin column. Valid 
mnemonic operation codes for machine and 
assembler operations are contained in 
Appendices D and E of this publication. 
Valid operation codes consist of five char- 
acters or fewer for machine or assembler 
operation codes, and eight characters or 
.fewer for macro- instruction operation 
codes. No blanks may appear within the 
operation entry- 

Operand Entries: Operand entries are the 
coding that identifies and describes data 
to be acted upon by the instruction, by 
indicating such things as storage loca- 
tions, masks, storage- area lengths, or 
types of data. 

Depending on the needs of the instruc- 
tion, one or more operands may be written. 
Operands are required for all machine 
instructions. 

Operands must be separated by commas. 
Blanks must not intervene between operands 
and the commas that separate them. 

The operands may not contain embedded 
blanks except as follows: 

If character representation is 
used to specify a constant, a 
literal, or immediate data in an 
operand, the character string may 
contain blanks, e.g., CAB D* . 

Comments Entries: Comments are descriptive 
items of information about the program that 
are to be inserted in the program listing. 
All 256 valid characters, including blanks, 
may be used in writing a comment- The 
entry cannot extend beyond the end column 
(normally column 71), and a blank must 
separate it from the operand- 

In instructions where an operand entry is 
optional but not present and a comments 
entry is desired, the absence of the operand 
entry must be indicated by a comma preceded 
and followed by one or more blanks, as 
follows : 



| Name | Operation | Operand 

I CSECT I , COMMENT 



END 



COMMENT 






Instruction Example: The following example 
illustrates the use of name, operation, 
operand, and comments entries. A compare 
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instruction has been named by the symbol 
COMP; the operation entry (CR) is the mne- 
monic operation code for a register-to- 
register compare operation, and the two 
operands (5,6) designate the two general 
registers whose contents are to be 
compared. The comments entry reminds the 
programmer that he is comparing "new sum" 
to "old" with this instruction. 



JName | Operation J Operand j 

| COMP |CR | 5, 6 NEW SUM TO OLD | 



Summary of Instruction Format 



appear at any point. Extensive notes, or 
comments, may be written by using a series 
of comments statements. 

There are two types of comments state- 
ments. One type, written with an asterisk 
(*) in the begin column, is used for com- 
ments on the source program. The other 
type, written with a period in the begin 
column and followed by an asterisk, is used 
for comments on a macro-definition. This 
type is further described in Section 7 . 

An example of the comments statement is: 

JName | Operation (Operand | | 

| *THIS COMMENT IS CONTINUED ON | X | 
| ANOTHER LINE. | j 



The entries in an instruction must always 
be separated by at least one blank and must 
be in the following order: name, operation, 
operand (s), comment. 

Every statement requires an operation 
entry. Name and comment entries are 
optional. Operand entries are required for 
all machine instructions and most assembler 
instructions . 

The name and operation entries must be 
completed in the first statement line, 
including at least one blank following the 
operation entry. 

The name and operation entries must not 
contain blanks. Operand entries must not 
have blanks preceding or following the 
commas that separate them. 

A name entry must always start in the 
"begin" column. 

If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 
column is not blank, the following line 
will be treated as a continuation line. 



Identification- Sequence Field 



The identification- sequence field of the 
coding form (columns 73-80) is used to 
enter program identification and/or state- 
ment sequence characters. The entry is 
optional. If the field, or a portion of 
it, is used for program identification, the 
identification is punched in the statement 
cards, and reproduced in the printed list- 
ing of the source program- 
To aid in .keeping source statements in 
order, the programmer may code an ascending 
sequence of characters in this field or a 
portion of it. These characters are 
punched into their respective cards, and, 
during assembly, the programmer may request 
the assembler to verify this sequence by 
use of the Input Sequence Checking (ISEQ) 
assembler instruction. This instruction is 
discussed in Section 5 under Program Con- 
trol Instructions. 



Character Set 



All entries must be contained within the 
designated begin, end, and continue column 
boundaries. 



Comments Statements 



Comments statements are used to include a 
programmer • s notes on an assembly listing. 
(These notes can be helpful during debug- 
ging and maintenance of a program. ) Com- 
ments statements have no effect in the 
assembled program; they are only printed in 
the assembly listing and, therefore, may 



Source statements are written using the 
following characters: 

Letters A through Z, and $, #, a 

Digits through 9 



Special 
Characters + - , = 



*()•/£ blank 



These characters are represented by the 
card punch combinations and internal bit. 
configurations listed in Appendix A. In 
addition, any of the 256 punch combinations 
may be designated anywhere that characters 
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r 



may appear between paired apostrophes, in 
comments, and in macro instruction oper- 
ands - 



ASSEMBLER LANGUAGE STRUCTURE 



The basic structure of the language can be 
stated as follows. 

A source statement is composed of: 

• A name entry (usually optional) . 

• An operation entry (mandatory) - 

• An operand entry (usually required). 

• A comments entry (optional). 

A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representing 
a machine, assembler, or macro instruc- 
tion. 

An operand entry is: 

o One or more operands composed of one or 
more expressions. An expression is 
composed of a term or an arithmetic 
combination of terms. In general, an 
operand entry should contain 50 or 
fewer terms (see Appendix H) . 

Operands of machine instructions gener- 
ally represent such things as storage loca- 
tions, general registers, immediate data, 
or constant values, operands of assembler 



instructions provide the information needed 
by the assembler program to perform the 
designated operation. 

Figure 2-3 depicts this structure. 
Terms shown in Figure 2-3 are classed as 
absolute or relocatable. Terms are abso- 
lute or relocatable due to the effect of 
program relocation upon them. (Program 
relocation is the loading of the object 
program into storage locations other than 
those originally assigned by the assembler 
program.) A term is absolute if its value 
does not change upon relocation. A term is 
relocatable if its value changes upon relo- 
cation. 

The following subsection. Terms and 
Expressions , discusses these items as out- 
lined in Figure 2-3. 



TERMS AND EXPRESSIONS 



TERMS 



Every term represents a value. This value 
may be assigned by the assembler program 
(symbols, symbol length attribute, location 
counter reference) or may be inherent in 
the term itself (self-defining term, 
literal). 

An arithmetic combination of terms is 
reduced to a single value by the assembler 
program. 

The following material discusses each 
type of term and the rules for its use. 
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Name Entry 



1 



Operation Entry 



Is a Symbol 
which is an 



Operand Entry 



Is a Mnemonic 
Operation Code 



Machine 
Instruction 



One or more 
Operands that 
are composed 
of an 



Assembler 
Instruction 



Macro 
Instruction 



Exp 



Ordinary 
Symbol 
(ATor RT) 



Exp (Exp) 



Exp (Exp, Exp) 



Exp - Expression 



Variable 
Symbol 



Term 



Sequence 
Symbol 



Arithmetic 
Combination 
of Terms 



which may be 
any one of 
the following 



A Symbol 
e.g., BETA 
(AT or RT) 



A Self- 
defining 
Term (AT) 



A Location 
Counter Refer- 
ence i.e.,* 
(RT) 



A Literal 

e.g.^F'1259 1 

(RT) 



Symbol Length 
Attribute Refer- 
ence e.g., 
L 'Symbol (AT) 



Other Symbol 

Attribute 
References (AT) 



which may be 
any one of 
the following 



AT = Absolute Term 
RT = Relocatable Term 



Decimal 
e.g., 15 



Hexadecimal 
e.g.,X'C4' 



Binary 
e.g.,BM0r 



Character 
e.g.,C'AB9' 



May be generated by combination of variable symbols and assembler language characters. (Conditional assembly only) 

2 

Conditional assembly only. 

Figure 2-3. Assembler Language Structure — Machine, Assembler, and Macro Instructions 
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Symbols 



A symbol is a character or combination of 
characters used to represent locations or 
arbitrary values. Symbols, through their 
use in name fields and in operands, provide 
the programmer with an efficient way to 
name and reference a program element- 
There are three types of symbols: 

1- Ordinary symbols. 

2. Variable symbols - 

3. Sequence symbols. 

Ordinary symbols consist of one to eight 
letters and/or numbers , the first of which 
must oe a letter, such symbols are used to 
identify machine locations or arbitrary 
values. In the following sections, "the 
occurrence of symbol refers to this type of 
term. Absolute symbols are ordinary sym- 
bols whose values do not change upon pro- 
gram relocation. Relocatable symbols are 
ordinary symbols whose values change upon 
relocation. 

The following are valid ordinary sym- 
bols: 

READER 

A23U56 

X4F2 

LOOP 2 

N 

SU 

3B4 

$A1 

#56 

It is advisable to avoid using .symbol s 
beginnin g with I J ; they may conflict with 
■TDTrs~Sy1fn5oTs~Twnich begin with IJ). 

It is also advisable to avoid usi ng 
symbols which a*re identical" .to., a. file nam e 
(name field) in a DTF statement with a 
single character suffix. For example, for 
the file name RECIN, IOCS generates the 
symbols: RECIN1, RECIN2, RECIN3, etc. 

The following ordinary symbols are 
invalid, for the reasons noted: 

256B First character is not 

alphabetic. 

REC0RDAREA2 More than eight characters. 

BCD+34 Contains a special character 
- an asterisk. 

IN AREA Contains a blank. 

Variable symbols must begin with an 
ampersand (6) followed by one to seven 
letters and/or numbers, the first of which 

must be a letter. Variable symbols are used 
within the source program or macro defini- 



tion to allow different values to be assign- 
ed to one symbol. A complete discussion of 
variable symbols appears in Part 3. 

Sequence symbols consist of a period (.) 
followed by one to seven letters and/or 
numbers, the first of which must be a let- 
ter. Sequence symbols are used to indicate 
the position of statements within the 
source program or macro definition. 
Through their use the programmer can vary 
the sequence in which statements are proc- 
essed by the assembler program. (See the 
complete discussion in Part 3 ). 

NOTE: Sequence symbols and variable symbols 
are used only for the macro language and for 
conditional assembly. Programmers who do 
not use these features need not be concerned 
with these symbols. 

DEFINING SYMBOLS: The assembler assigns a 
value to each symbol appearing as a name 
entry in a source statement- The values 
assigned to symbols naming storage areas, 
instructions, constants, and control sec- 
tions are the addresses of the leftmost 
bytes of the storage fields containing the 
named items. Since the addresses of these 
items may change upon program relocation, 
the symbols naming them are considered 
relocatable terms. 

A symbol used as a name entry in the 
Equate Symbol (EQU) assembler instruction 
is assigned a value designated in the oper- 
and entry of the instruction. Since the 
operand entry may represent a relocatable 
value, or an absolute (i.e., nonchanging) 
value, the symbol is considered a relocata- 
ble term or an absolute term, depending on 
the value to which it is equated. 

The value of a symbol may not be nega- 
tive and may not exceed 2 2 ^-l. 

A symbol is said to be defined when it 
appears as the name of a source statement. 
(A special case of symbol definition is 
discussed in Section 3, under "Program 
Sectioning and Linking"). 

Symbol definition also involves the 
assignment of a length attribute to the 
symbol. (The assembler maintains an inter- 
nal table - the symbol table - in which the 
values and attributes of symbols are kept. 
When the assembler encounters a symbol in 
an operand, it refers to the table for the 
values associated with the symbol. ) The 
length attribute of a symbol is the length, 
in bytes, of the storage field whose 
address is represented by the symbol. For 
example, a symbol naming an instruction 
that occupies four bytes of storage has a 
length attribute of 4. Note that there are 
exceptions to this rule; for example, in 
the case where symbol has been defined by 
an equate to location counter value (EQU *) 
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or to a self-defining term, the length 
attribute of the symbol is 1. These and 
other exceptions are noted under the 
instructions involved. The length attri- 
bute is never affected by a duplication 
factor. 

PREVIOUSLY DEFINED SYMBOLS: The assembler 
language requires that symbols appearing in 
the operand entry of some instructions be 
previously defined. This simply means that 
the symbols, before their use in an oper- 
and, must have appeared as the name entry 
of a prior statement. For example: 



SYM1 
SYM2 



MVC 
EQU 



A,B 
SYM1 



would be a valid sequence of coding. The 
same two instructions in reverse order 
would be invalid. 

GENERAL RESTRICTIONS ON SYMBOLS: A symbol 
may be defined only once in an assembly. 
While the same symbol may appear as the 
name of two or more statements before macro 
generation and conditional assembly, only 
one such statement should be generated. In 
addition, a symbol may be used in the name 
field more than once as a control section 
name (i.e., defined in the START, CSECT, or 
DSECT assembler statements described in 
Section 3 ) because the coding of a control 
section may be suspended and then resumed 
at any subsequent point. The CSECT or 
DSECT statement that resumes the section 
must be named by the same symbol that ini- 
tially named the, section; thus, the symbol 
that names the section must be repeated. 
Such usage is not considered to be duplica- 
tion of a symbol definition. 

Self-Defining Terms 



A self-defining term is one whose value is 
inherent in the term. It is not assigned a 
value by the assembler program. For exam- 
ple, the decimal self-defining term — 15 
— represents a value of fifteen. 

There are four types of self-defining 
terms: decimal, hexadecimal, binary, and 
character. Use of these terms is spoken of 
as decimal, hexadecimal, binary, or charac- 
ter representation of the machine language 
binary value or bit configuration they 
represent. 

Self-defining terms are classed as abso- 
lute terms because the values they rep- 
resent do not change upon program reloca- 
tion. 



USING SELF-DEFINING TERMS: Self-defining 
terms are the means of specifying machine 
values or bit configurations without equat- 
ing the values to symbols and using the 
symbols. Self -defining terms may be used 
to specify such program elements as immedi- 
ate data, masks, registers, addresses, and 
address increments. 

The use of a self- defining term is quite 
distinct from the use of data constants or 
literals. When a self-defining term is 
used in a machine-instruction statement, 
its value is assembled into the instruc- 
tion. When a data constant or literal is 
specified in the operand of an instruction, 
its address is assembled into the instruc- 
tion. 

Decimal Self- Defining Term: A decimal term 
is simply an unsigned decimal number writ- 
ten as a sequence of decimal digits- High- 
order zeros may be used (e.g. ,007). 
Limitations on the value of the term depend 
on its use. For example, a decimal term 
that designates a general register must 
have a value between and 15 inclusively; 
one that represents an address must not 
exceed the size of storage. In any case, a 
decimal term may not consist of more than 
eight digits or exceed 16,777,215 (2 2£ *-l). 
A decimal term is assembled as its binary 
equivalent. Some examples of decimal self- 
defining terms are: 8, 147, 4092, 00021. 

Hexadecimal Self-Defining Term: A hexa- 
decimal self-defining term is a sequence of 
one to six hexadecimal digits. The digits 
must be enclosed in .single apostrophes and 
preceded by the letter X: X'C49'. 



Each hexadecimal digit is assembled as 
its four-bit binary equivalent. Thus, a 
hexadecimal term used to represent an 
eight-bit mask would consist of two hexa- 
decimal digits. The maximum value of a 
hexadecimal term is X'FFFFFF* . 

The hexadecimal digits and their bit 
patterns are as follows: 

0- 0000 4- 0100 8- 1000 C- 1100 

1- 0001 5- 0101 9- 1001 D- 1101 

2- 0010 6- 0110 A- 1010 E- 1110 

3- 0011 7- 0111 B- 1011 F- 1111 

A table for converting from hexadecimal 
representation to decimal representation is 
provided in Appendix B . 

Binary Self-Defining Term: A binary self- 
defining term is written as an unsigned 
sequence of l*s and 0*s enclosed in 
apostrophes and preceded by the letter B, 
as follows: B' 100011 01'. This term would 
appear in storage as shown, occupying one 
byte. A binary term may have up to 24 bits 
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represented. Padding with binary zeros is 
on the left. 

Binary representation is used primarily 
in designating bit patterns of masks or in 
logical operations. 

The following example illustrates a 
binary term used as a mask in a Test Dnder 
Mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, against 
the pattern of bits represented by the 
binary term. 



i t » 

| Name | operation | operand 

I 1. +- 

JALPHA JTM 



1 
1 

| GAMMA, B*l 0101101 ' j 



Character Self -Defining Term: A character 
self-defining term consists of one to three 
characters enclosed by apostrophes. It 
must be preceded by the letter C. All 
letters, decimal digits, and special char- 
acters may be used in a character terra. In 
addition, any of the remainder of the 256 
punch combinations may be designated in a 
character self-defining term. Examples of 
character self-defining terms are as fol- 
lows: 



cv 

C*ABC" 



C" • (blank) 
C'13* 



Because of the use of apostrophes in the 
assembler language and ampersands in the 
macro language as syntactic characters, the 
following rule must be observed when using 
these characters in a character term. 

For each apostrophe or ampersand desired 
in a character term, two apostrophes or 
ampersands must be written. For example, 
the character value A* # would be written as 
C*A* '#*, while an apostrophe followed by a 
blank and another apostrophe would be writ- 
ten as C" • • • • • . 

Each character in the character sequence 
is assembled as its eight- bit code equiva- 
lent (see Appendix A ). The two apostrophes 
or ampersands that must be used to rep- 
resent a single apostrophe or ampersand 
within the character sequence are assembled 
as a single apostrophe or ampersand. 



Location Counter Reference 



A Location Counter is used to assign 
storage addresses to program statements. 
It is the assembler program's equivalent of 
the instruction counter in the computer. 



As each machine instruction or data area is 
assembled, the Location Counter is first 
adjusted to the proper boundary for the 
item, if adjustment is necessary, and then 
incremented by the length of the assembled 
item. Thus, it always points to the next 
available location. If the statement is 
named by a symbol, the value assigned to the 
symbol is the value of the Location Counter 
after boundary adjustment, but before addi- 
tion of the length. 

The assembler maintains a Location 
Counter for each control section of the 
program and manipulates each Location 
Counter as previously described. Source 
statements for each section are assigned 
addresses from the Location Counter for 
that section. The Location Counter for 
each successively declared control section 
assigns locations in consecutively higher 
areas of storage. If a program has multi- 
ple control sections, all statements iden- 
tified as belonging to the first control 
section will be assigned from the Location 
Counter for section 1, the statements for 
the second control section will be assigned 
from the Location Counter for section 2, 
etc. This procedure is followed whether 
the statements from different control sec- 
tions are interspersed or written in con- 
trol section sequence. 

The Location Counter setting can be 
controlled by using the START and ORG 
assembler instructions, which are described 
i n Sections 3 and 5, respectively. The 
counter affected by either of these assem- 
bler instructions is the counter for the 
control section in which they appear. The 
maximum value for the Location Counter is 
22«-l. 

The programmer may refer to the current 
value of the Location Counter at any place 
in a program, by using an asterisk in an 
operand. The asterisk represents the loca- 
tion of the first byte of currently availa- 
ble storage (i.e., after any required 
boundary adjustment) . Using an asterisk in 
a machine-instruction statement is the same 
as placing a symbol in the name field of 
the statement and then using that symbol as 
an operand of the statement. Because a 
Location Counter is maintained for each 
control section, a Location Counter ref- 
erence designates the Location Counter for 
the section in which the reference appears. 

A reference to the Location Counter may 
be made in a literal address constant 
(i.e., the asterisk may be used in an 
address constant specified in literal 
form). The address of the instruction 
containing the literal is used for the 
value of the Location Counter. A Location 
Counter reference may not be used in a 
statement which requires the use of a 
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predefined symbol, with the exception of 
the EQU and ORG assembler instructions. 



Literals 



A literal term is one of three basic ways 
to introduce data into a program. It is 
simply a constant preceded by an equal sign 

A literal represents data rather than a 
reference to data. The appearance of a 
literal in a source statement directs the 
assembler program to assemble the data 
specified by the literal, store this data 
in a "literal pool", and place the value 
(address) of the storage field containing 
the data in the operand field of the assem- 
bled statement. 

Literals provide a means of entering 
constants (such as numbers for calculation, 
addresses, indexing factors, or words or 
phrases for printing out a message) into a 
program by specifying the constant in the 
operand of the instruction in which it is 
used. This is in contrast to using the DC 
assembler instruction to enter the data 
into the program, and then using the name 
of the DC instruction in the operand. Only 
one reference to a literal is allowed in a 
ma chine- instruction statement. 

A literal term may not be combined with 
any other terms. 

A literal may not be used as the receiv- 
ing field of an instruction that modifies 
storage. 

A literal may not be specified in an 
address constant (see Section 5 , DC — Define 
Constant) . A literal may not be specified 
in a shift instruction or an I/O instruc- 
tion (HIO,TIO,SIO) . 

A literal may not have an explicit base 
or an explicit index when specified in an 
instruction. 

The instruction coded below shows one 
use of a literal. 



i r t 

| Name | operation | Operand 

IGAMMA |L JlO^F^Ta* 






The statement GAMMA is a load instruc- 
tion using a literal as the second operand. 
When assembled, the second operand of the 
instruction will be the address at which 
the binary value represented by F'27 4* is 
stored. 

NOTE: If the literal operand is a self-de- 
fining term (X,C,B, or D) , and the = is 



omitted the statement may assemble without 
error (see Using Self-Defining Terms) . 

In general, literals may be used wherev- 
er a storage address is permitted as an 
operand. They may not, however, be used in 
any assembler instruction. Literals are 
considered relocatable, because the address 
of the literal, rather than the literal 
itself, will be assembled in the statement 
that employs a literal. The assembler 
generates the literals, collects them, and 
places them in a specific area of storage, 
as explained in the subsection "The Literal 
Pool." A literal is not to be confused 
with the immediate data in an SI instruc- 
tion. Immediate data is assembled into che 
instruction. 



Literal Format; The assembler requires a 
description of the type of literal being 
specified as well as the literal itself. 
This descriptive information assists the 
assembler in assembling the literal cor- 
rectly- The descriptive portion of the 
literal must indicate the format in which 
the constant is to be assembled. It may 
also specify the length the constant is to 
occupy. 

The method of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the oper- 
and of a DC assembler instruction. The 
major difference is that the literal must 
start with an equal sign (=) , which indi- 
cates to the assembler that a literal fol- 
lows. See the discussion of the DC assem- 
bler instruction operand format ( Section 5 ) 
for the means of specifying a literal. The 
type of literal designated in an instruc- 
tion is not checked for correspondence with 
the operation code of the instruction. 

Some examples of literals are: 



=A(BETA) 
=F'1234» 

=C , ABC i 



address constant literal, 
a fixed- point number with 
a length of four bytes, 
a character literal. 



The Literal Pool; The literals processed 
by the assembler are collected and placed 
in a special area called the literal pool, 
and the location of the literal, rather 
than the literal itself, is assembled in 
the statement employing a literal. The 
positioning of the literal pool may be 
controlled by the programmer, if he so 
desires. Unless otherwise specified, the 
literal pool is placed at the end of the 
first control section. 

The programmer may also specify that 
multiple literal pools be created. Howev- 
er, the sequence in which literals are 
ordered within the pool is controlled by 
the assembler. Further information on 
positioning the literal pool(s) is in Sec- 
tion 5 under LTORG — BEGIN LITERAL POOL. 



\ - 
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Duplicate Literals: If duplicate literals 
- N occur within one literal pool, only one 
\ literal is stored. Literals are considered 
V_y duplicates only if their specifications are 
identical. A literal will be stored, even 
if it appears to duplicate another literal, 
if it is an A-type address constant con- 
taining any reference to the Location 
Counter. 

The following examples illustrate the 
foregoing rules: 



CO* 

XLa'O' 

HL3'0* . 

A(*+4) ' 

A(*+4) . 

X'FFFF' 
X t FFFF . 



Both are stored 



Both are stored 



Both are stored 



Identical; the first is stored 



the leftmost two bytes of Al. The term 
L*B2 in parentheses provides the length 
specification required by the instruction. 
When the instruction is assembled, the 
length is placed in the proper field of the 
machine instruction. 

The statement named LOORD moves the 
contents of B2 into the rightmost two bytes 
of Al. The combination of terms 
A1+L*A1-L'B2 results in the addition of the 
length of Al to the beginning address of 
Al, and the subtraction of the length of B2 
from this value. The result is the address 
of the seventh byte in field Al. The con- 
stant represented by B2 is moved into Al 
starting at this address. L' B2 in 
parentheses provides length specification 
as in HIORD. 

Note : The length attribute of * is equal 
to the length of the instruction in which 
it appears, except in an EQU to * instruc- 
tion where the length attribute is 1. 



EXPRESSIONS 



r 



Symbol Length Attribute Reference 



The length attribute of a symbol may be 
used as a term by coding L' followed by the 
symbol, as in: 

L'BETA 

The length attribute of BETA will be 
substituted for the term. The following 
example illustrates the use of L* symbol in 
moving a character constant into either the 
high-order or low- order end of a storage 
field. 

For ease in following the example, the 
length attributes of Al and B2 are men- 
tioned. 



r t t 

| Name | Operation | Operand 
j. 1 1 

1 Al J DS 

J B2 j DC 

j HIORD j MVC 

| LOORD | MVC 

L X 



| CL8 | 

|CL2*AB' j 

|AKL f B2),B2 | 

JAH-L'A1-L , B2(L , B2),B2| 

.1 J 



Al names a storage field eight bytes in 
length and is assigned a length attribute 
of eight. B2 names a character constant 
two bytes in length and is assigned a 
length attribute of two. The statement 
named HIORD moves the contents of B2 into 



Expressions, which are used in coding oper- 
and entries for assembler language state- 
ments, are composed of either a single term 
or an arithmetic combination of terms (see 
Figure G-2) . Arithmetically combined 
terms, enclosed in parentheses, may be used 
in combination with terms outside the 
parentheses. For example: 

14+BETA- ( GAMMA- LAMBDA) 

When terms in parentheses occur in com- 
bination with other terms, like 
(GAMttA- LAMBDA) in the example, the paren- 
thesized terms are reduced first to a sin- 
gle value. This value may be absolute or 
relocatable, depending on the combination 
of terms. This value then is used in 
reducing the rest of the combination to 
another single value. 

Parenthesized terms may be included 
within another set of terms in parentheses. 
For example: 

A+B-(C+D-(E+F)*10) 

This expression has two levels of 
parentheses. A level of parentheses is a 
left parenthesis and its matching right 
parenthesis. One level of parentheses 
surrounds E+F. The next higher level of 
parentheses surrounds C+D-(E+F)+10. The 
innermost set of terms in parentheses (the 
lowest level) is evaluated first. 

The following are examples of valid 
expressions: 
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BETA* 10 
B , 101 f 

C'ABC 

29 

L' FIELD 

LAMBDA+ GAMMA 
TEN/TtfO 



AREAl+X^D' 

* + 32 

N-25 

FIELD* 332 

FIELD 

( EX IT- ENTR Y+ 1 ) + GO 

=F , 1234* 

ALPHA- BET A/ ( 10+ ARE A*L* FIELD) -100 

A* (A* (A* ( A+l) +3* (B-3) ) ) 

The rules for coding expressions are: 

1. An expression may not start with an 
arithmetic operator, that is, +-/* 
Therefore, the expression -A+BETA is 
invalid. However, the expression 
0-A+BETA is valid. 

2. An expression may not contain two terms 
or two operators in succession. 

3. An expression may not consist of more 
than 16 terms. 

1. An expression may not have more than 
five levels of parentheses. 

5. A multi-term expression may not contain 
a literal. 



Evalua tio n of ^Expressions 



A single term expression, e.g., 29, BETA, 
*, L* SYMBOL, takes on the value of the term 
involved. 

A multi-term expression, e.g., BETA+10, 
ENTRY-EXIT, 25*10+A/B, is reduced to a 
single value, as follows: 

1. Each term is given its value. 

2. Arithmetic operations are performed 
left to right. Multiplication and 
division are done before addition and 
subtraction, e.g. , A+B+C is evaluated 
as A+(B*C), not (A+B)*C. The computed 
result is the value of the expression. 

3. Every expression is computed to 32 bits, 
and then truncated to the rightmost 24 
bits. 

4. Division always yields an integer 
result; any fractional portion of the 
result is dropped. E.g., 1/2*10 yields 
a zero result, whereas 10*1/2 yields 5. 

5. Division by zero is valid and yields a 
zero result. 

Parenthesized expressions used in an 
expression are processed before the rest of 
the terms in the expression, e.g., in the 
expression A+BETA* (CON-10) , the term CON-10 
is evaluated first and the resulting value 
used in computing the final value of the 
expression. 



Negative values are carried in two's com- 
plement form. Final values of expressions 
are the rightmost 24 bits of the results. 
Intermediate results have a range of -2^3 
through 2 31 -1. However, the value of an 
expression before truncation must be in 
the range -2 24 through 2 24 -l or the results 
will be meaningless. A negative result 
is considered to be a 3-byte positive value. 

NOTE: In A- type address constants, the 
full 32 bit final result is truncated on 
the left to fit the specified or implied 
length of the constant. 

Absolute and. Relocatab le Expressions 



An expression is called absolute if its 
value is unaffected by program relocation. 

An expression is called relocatable if 
its value changes upon program relocation. 

The two types of expressions, absolute 
and relocatable, take on these charac- 
teristics from the term or terms composing 
them. The following material discusses 
this relationship. 

Absolute Expression; An absolute expres- 
sion may be an absolute term or any arith- 
metic combination of absolute terms. An 
absolute term may be an absolute symbol, 
any of the self-defining terms, or the 
length attribute reference. As indicated 
in Figure 2-2, all arithmetic operations 
are permitted between absolute terms - 

An absolute expression may contain relo- 
catable terms (RT) — alone or in combina- 
tion with absolute terms (AT) — under the 
following conditions: 

1. There must be an even numbe r of reloca- 
table terms in the expression. 

2. The relocatable terms must be paired. 
Each pair of terms must have the same 
relocatability attribute, i.e., they 
appear in the same control section in 
this assembly (see Program Sectioning 
and Linking , S ect ion 3 ) . Each pair 
must consist of terms with opposite 
signs. The paired terms do not have to 
be contiguous, e.g., RT+AT-RT. 

3. No relocatable expression may enter 
into a multiply or divide operation. 
Thus, RT-RT*10 is invalid. However, 
(RT-RT)*10 is valid. 

The pairing of relocatable terms (with 
opposite signs and the same relocatability 
attribute) cancels the effect of reloca- 
tion. Therefore the value represented by 
the paired terms remains constant, regard- 
less of program relocation. For example, 
in the absolute expression A-Y+X, A is an 
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absolute term, and X and Y are relocatable 
terms with the same relocatability attri- 
bute. If A equals 50, Y equals 25, and X 
equals 10, the value of the expression 
would be 35. If X and Y are relocated by a 
factor of 100 their values would then be 
125 and 110. However, the expression would 
still evaluate as 35 (50-125+110=35). 



3. The unpaired term must not be directly 
preceded by a minus sign. 



No relocatable terra may enter into a 
multiply or divide operation. 



An absolute expression reduces to a 
single absolute value. 

The following examples illustrate abso- 
lute expressions. A is an absolute term; X 
and Y are relocatable terms with the same 
relocatability attribute. 

A-Y+X 

A 

A*A 

X-Y+A 

*-Y (a reference to the Location counter 
must be paired with another relocata- 
ble term from the same control sec- 
tion, i.e., with the same relocatabil- 
ity attribute) 

Relocatable Expressions: A relocatable 
expression is one whose value would change 
by n if the program in which it appears is 
relocated n bytes away from its originally 
assigned area of storage- 

A relocatable expression may be a relo- 
catable term. A relocatable expression may 
contain relocatable terms — alone or in 
combination with absolute terms — under 
the following conditions: 

1. There must be an odd number of reloca- 
table terms. 

2. All the relocatable terms but one must 
be paired. Pairing is described in 
Absolute Expression . 



A relocatable expression reduces to a 
single relocatable value. This value is 
the value of the odd relocatable, term, 
adjusted by the values represented by the 
absolute terms and/or paired relocatable 
terms associated with it. 



For example, in the expression W-x+w-10, 
w and X are relocatable terms with the same 
relocatability attribute. If initially W 
equals 10 and X equals 5, the value of the 
expression is 5. However, upon relocation 
this value will change. If a relocation 
factor of 100 is applied, the value of the 
expression is 105. Note that the value of 
the paired terms, W-X, remains constant at 
5 regardless of relocation. Thus, the new 
value of the expression, 105, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X and 10. 

The following examples illustrate relo- 
catable expressions. A is an absolute 
term, W and X are relocatable terms with 
the same relocatability attribute, Y is a 
relocatable tern? with a different relocat- 
ability attribute. 



Y-32*A W-X+* 
W-X+Y 

* (reference to 
Location Counter) 



=F f 1234' (literal) 

A*A+W-W+Y 

W-X+W 

Y 
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PART 2 — BASIC FUNCTIONS OF THE ASSEMBLER LANGUAGE 



SECTION 3: ADDRESSING — PROGRAM 
SECTIONING AND LINKING 



the assembler through the USING and DROP 
assembler instructions. 



ADDRESSING 



The System/360 addressing technique 
requires the use of a base register, which 
contains the base address, and a displace- 
ment, which is added to the contents of the 
base register. The programmer may specify 
a symbolic address and request the assem- 
bler to determine its storage address in 
terms of a base register and a displace- 
ment. The programmer may rely on the 
assembler to perform this service for him 
by indicating which general registers are 
available for assignment and what values 
the assembler may assume each contains. 
The programmer may use as many or as few 
registers for this purpose as he desires. 
The only requirements are that, at the 
point of reference, a register containing 
an address from the same control section is 
available, and that this address is less 
than or equal to the address of the item to 
which the reference is being made. The 
difference between the two addresses may 
not exceed 4095 bytes. 



ADDRESSES — EXPLICIT AND IMPLIED 



An address is composed of a displacement 
plus the contents of a base register- (In 
the case of RX instructions, the contents 
of an index register are also used to der- 
ive the address.) 



The programmer writes an explicit 
address by specifying the displacement and 
the base register number. In designating 
explicit addresses a base register may not 
be combined with a relocatable symbol. 



He writes an implied address by speci- 
fying an absolute or relocatable address. 
The assembler has the facility to select a 
base register and compute a displacement, 
thereby generating an explicit address from 
an implied address, provided that it has 
been informed (1) what base registers are 
available to it and (2) what each contains. 
The programmer conveys this information to 



BASE REGISTER INSTRUCTIONS 

The USING and DROP assembler instructions 
enable programmers to use expressions rep- 
resenting implied addresses as operands of 
ma chine- instruction statements, leaving the 
assignment of base registers and the calcu- 
lation of displacements to the assembler. 

In order to use symbols in the operand 
field of machine-instruction statements, 
the programmer must (1) indicate to the 
assembler, by means of a USING statement, 
that one or more general registers are 
available for use as base registers, (2) 
specify, by means of the USING statement, 
what value each base register contains, and 
(3) load each base register with the value 
he has specified for it. 

Having the assembler determine base 
registers and displacements relieves the 
programmer of separating each address into 
a displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time required to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection. The principal discussion of 
this feature follows the description of 
both instructions. 



USING — Use Base Address Register 



The USING instruction indicates that one or 
more general registers are available for 
use as base registers. This instruction 
also states the base address values that 
the assembler may assume will be in the 
registers at object time. Note that a 
USING instruction does not load the reg- 
isters specified. It is the programmer's 
responsibility to see that the specified 
base address values are placed into the 
registers. Suggested loading methods are 
described in the subsection Programming 
with the USING Instruction . The typical 
form of the USING instruction statement is: 



2H 



r* 



Name j operation j Operand 



, A | USING 

sequence j 
symbol ori 
not used i 



-I 

| From 2-17 expressions! 
j of the form v,rl, | 
|r2,r3,...,rl6 j 

J 



Operand v must be an absolute or reloca- 
table expression with a value ranging from 
-2 ai » to +2 a «*-l. No literals are permitted. 
Operand v specifies a value that the assem- 
bler can use as a base address. The other 
operands must be absolute expressions. The 
operand rl specifies the general register 
that can be assumed to contain the base 
address represented by operand v. Operands 
r2, r3, r4, . . . specify registers that 
can be assumed to contain v+4096, v+8192, 
v+12288, . . ., respectively. The values 
of the operands rl, r2, r3 # --., rl6 must 
be between and 15. For example, the 
statement: 



. p ., 

| Name | Operation j Operand 
| + + . 



L 



| USING 



I*, 12,13 

JL 



J 



tells the assembler it may assume that the 
current value of the Location Counter will 
be in general register 12 at object time, 
and that the current value of the Location 
Counter, incremented by 4096, will be in 
general register 13 at object time. 

If the programmer changes the value in a 
base register currently being used, and 
wishes the assembler to compute displace- 
ment from this value, the assembler must be 
told the new value by means of another 
USING statement. In the following sequence 
the assembler first assumes that the value 
of ALPHA is in register 9. The second 
statement then causes the assembler to 
assume that ALPHA+1000 is the value in 
register 9. 



r- r 1 

| Name | Operation | Operand 

1 + + 

I | USING | ALPHA, 9 



I 

-H 



2. Register must be specified as operand 
rl. 

The assembler assumes that register 
contains zero. Therefore, regardless of the 
value of operand v, it calculates dis- 
placements as if operand v were absolute 
or relocatable zero. The assembler also 
assumes that subsequent registers specified 
in the same USING statement contain 4096, 
8192, etc. 

NOTE: If register is used as a base 
register, the program is not relocatable, 
despite the fact that operand v may be 
relocatable. The program can be made re- 
locatable by: 

1. Replacing register in the USING 
statement. 

2. Loading the new register with a re- 
locatable value. 

3. Reassembling the program. 

DROP — Drop Ease Register 

The DROP instruction specifies a previously 
available register that may no longer be 
used as a base register. The typical form 
of the DROP instruction statement is as 
follows: 



Name j Operation 

[a | DROP 
j sequence | 
| symbol or| 
Inot used j 



| Operand | 

| Up to 16 absolute | 

| expressions of the j 

|form rl,r2, j 

|r3,...,rl6 | 



The expressions indicate general reg- 
isters previously specified in a USING 
statement that are now unavailable for base 
addressing. The following statement, for 
example, prevents the assembler from using 
registers 7 and 11: 



, T T ^ 

| Name | Operation | Operand j 

| |DROP | 7,11 "| 
i j i. j 



I USING 



— X- 



|ALPHA+1000,9 

.j — : 



— j 



If the programmer has to refer to the 
first 4096 bytes of storage, he can use 
general register as a base register sub- 
ject to the following conditions: 

1. The value of operand v must be either 
an absolute or relocatable zero or 
simply relocatable. 



It is not necessary to use a DROP state- 
ment when the base address in a register is 
changed by a USING statement; nor are DROP 
statements needed at the end of the source 
program. 

A register made unavailable by a DROP 
instruction can be made available again by 
a subsequent USING instruction. 
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PROGRAMMING WITH THE USING INSTRUCTION 

The USING (and DROP) instructions may be 
used anywhere in a program, as often as 
needed, to indicate the general registers 
that are available for use as base reg- 
isters and the base address values the 
assembler may assume each contains at ex- 
ecution time. Whenever an address is spec- 
ified in a machine instruction statement, 
the assembler determines whether there is 
an available register containing a suitable 
base address . The USING instruction estab- 
lishes addressability at assembly time, as- 
suming that the registers assigned as base 
registers have been loaded with correct base 
addresses. Any reference to relocatable or 
absolute terms, which are to be assembled 
into the base-displacement form, such as 
names in the operand of a machine instruc- 
tion or S-type address constant, must come 
after the pertinent USING instruction that 
makes the terms addressable. References to 
terms relocatable or otherwise in the' oper- 
and of an A-type or Y-type address constant 
do not have to be preceded by a USING state- 
ment. A register is considered available 
for a relocatable address if it was assigned 
a relocatable value that is in the same con- 
trol section as the address. A register as- 
signed an absolute value is available for 
addressing absolute locations only. In 
either case the base address is considered 
suitable only if it is less than or equal to 
the address of the item to which the refer- 
ence is made. The difference between the 
two addresses may not exceed 4095 bytes. In 
calculating the base register to be used, 
■uhe assembler always uses the available reg- 
ister giving the smallest displacement. If 
there are two registers with the same value, 
the highest numbered register is used. 

| Name | Operation | Operand 






I BEGIN 



j FIRST 



BALR 
USING 



| LAST | - 
j | END 



2,0 
*,2 



BEGIN 






In the preceding sequence, the BALR 
instruction loads register 2 with the 
address of the first storage location 
immediately following- In this case, it is 
the address of the instruction named FIRST. 
The USING instruction indicates to the 
assembler that register 2 contains this 
location. When employing this method, the 
USING instruction must immediately follow 
the BALR instruction. No other USING or 
load instructions are required if the loca- 
tion named LAST is within 4 095 bytes of 
FIRST. 

In Figure 3-1, the BALR and LM instruc- 
tions load registers 2-5. The USING 
instruction indicates to the assembler that 
these registers are available as base reg- 
isters for addressing a maximum of 16,384 
consecutive bytes of storage, beginning 
with the location named HERE. The number 
of addressable bytes may be increased or 
decreased by altering the number of reg- 
isters designated by the USING and LM 
instructions and the number of address 
constants specified in the DC instruction. 

Note: Care must be taken when assigning 
base registers to avoid using, except under 
special circumstances: 

1. General registers 0, 1, 13, 14 and 15, 
as they are used by the system. 

2. Any register used explicitly or impli- 
citly by a machine instruction. 

RELATIVE ADDRESSING 

Relative addressing is the technique of 
addressing instructions and data areas by 
designating their location in relation to 
the Location Counter or to some symbolic 
location. This type of addressing is 
always in bytes, never in bits, words, or 
instructions. Thus, the expression *+4 
specifies an address that is four bytes 
greater than the current value of the Loca- 
tion counter. In the sequence of instruc- 
tions shown in the following example, the 
location of the CR machine instruction can 
be expressed in two ways, ALPHA* 2 or 
BETA-4, because all of the mnemonics in the 
example are for 2-byte instructions in the 
RR format. 



| Name 

| BEGIN | BALR 
I j USING 

|LM 
IB 
| DC 

I- 
I- 



j Opera t ion j Operand 



HERE 

BASEADDR 
FIRST 



| LAST 
[ 



| END 



"I 

|2,0 

JHERE, 2, 3, 4,5 

j 3 , 5 , BASEADDR 

I FIRST 

|A(HERE+4096,HERE+8192,HERE+12288) 



I BEGIN 



J 



Figure 3-1- Multiple Base Register Assignment 
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I r r 

; Name | Operation J Operand 
+ + _. 



I 

| ALPHA | LR 

I 1CR 

| |BCR 

JBETA JAR 



|3,4 
|4.6 

|2.3 



1 






other coding, at load time without altering 
or impairing the operating logic of the 
program- It is normally identified by the 
CSECT instruction. However, if it is 
desired to specify a tentative starting 
location, the START instruction may be used 
to identify the first control section. 



/-" 



PROGRAM SECTIONING AND LINKING 

It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined subsequently into one program. 
The assembler provides facilities for 
creating multisectioned programs and sym- 
bolically linking separately assembled 
programs or program sections. 



Sectioning a program is optional, and 
many programs can best be written without 
sectioning them. The programmer writing an 
unsectioned program need not concern him- 
self with the subsequent discussion of 
program sections, which are called control 
sections. He need not employ the CSECT 
instruction, which is used to identify the 
control sections of a multisection program. 
Similarly, he need not concern himself with 
the discussion of symbolic linkages if his 
program neither requires a linkage to nor 
receives a linkage from another program. 
He may, however, wish to identify the pro- 
gram and/or specify a tentative starting 
location for it, both of which may be done 
by using the START instruction. He may 
also want to employ the dummy section fea- 
ture obtained by using the DSECT instruc- 
tion. 



Note; Program sectioning and linking is 
closely related to the specification of 
base registers for each control section. 
Sectioning and linking examples are provid- 
ed under the heading Addressing External 
Control Sections. 



To the assembler, there is no such thing 
as a program; instead, there is a source 
module, which consists of one or more con- 
trol sections. (However, the terms source 
module and program are often used inter- 
changeably.) An unsectioned program is 
treated as a single control section. To the 
linkage editor, there are no programs, only 
control sections that must be fashioned into 
one or more phases . 

The output from the assembler is called 
an object module. It contains data required 
for linkage editor processing. The external 
symbol dictionary, which is part of the 
object module, contains information the 
linkage editor needs in order to complete 
cross-referencing between control sections, 
as it combines them into a program. The 
linkage editor can take control sections 
from various assemblies and combine them 
properly with the help of the corresponding 
external symbol dictionaries. Successful 
combination of separately assembled control 
sections depends on the techniques used to 
provide symbolic linkages between the con- 
trol sections. 

Whether the programmer writes an unsec- 
tioned program, a multisection program, or 
part of a multisection program, he still 
knows what eventually will be entered into 
storage, because he has described storage 
symbolically. He may not know where each 
section appears in storage, but he does 
know what storage contains. There is no 
constant relationship between control sec- 
tions. Thus, knowing the location of one 
control section does not make another con- 
trol section addressable by relative 
addressing techniques. 



CONTROL SECTIONS 



The concept of program sectioning is a 
consideration at coding time, assembly 
time, and load time. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control 
sections; if so, he writes it in such a way 
that control passes properly from one sec- 
tion to another regardless of the relative 
physical position of the sections in stor- 
age. A control section is a block of cod- 
ing that can be relocated, independently of 



There is a limit to the number of exter- 
nal symbol dictionary entries. The total 
number of control sections (named, unnamed, 
and common control sections) , dummy 
sections, unique symbols in EXTRN and WXTRN 
statements, and V-type address constants 
may not exceed 255. (The V-type address 
constant is described in Section 5 under 
DC — Define Constant ; the other external 
symbols are described in this section.) 
If the same symbol appears both in V-type 
address constant and in the name field of 
a START, CSECT, or DSECT statement, it is 
counted as two symbols . 
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Control Section Location Assignment 



Control section contents can be intermixed 
because the assembler provides a Location 
Counter for each control section. Control 
sections are assigned starting locations 
consecutively, in the same order as the 
control sections first occur in the pro- 
gram. Each control section subsequent to 
the first begins at the next available 
double-word boundary. 



FIRST CONTROL SECTION 



a program initiated by an unnamed START is 
considered to identify the continuation of 
the unnamed control section. 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the con- 
trol section. It has a length attribute of 
one. 

The assembler uses the self-defining 
term specified by the operand as the ini- 
tial value of the location counter of the 
program. This value should be divisible by 
eight. For example, either of the follow- 
ing statements: 



The first control section of a program has 
the following special properties. 

1. The initial value of its location coun- 
ter may be specified as an absolute 
value. 



Name | Operation J Operand 

PR0G2 | START |20U0 
PR0G2 j START j X ' 7F8 » 

A L 



2. It normally contains the literals 
requested in the source module, 
although their positioning can 
be altered. This is further 
explained under the discussion of 
the LTORG assembler instruction. 



START — Start Assembly 



The START instruction may be used to give a 
name to the first (or only) control section 

of a source module. It may also be used 
to specify the initial value of the location 
counter for the first control section of the 
module. The typical form of the START 
instruction statement is as follows: 



could be used to assign the name PR0G2 to 
the first control section and to set the 
initial value of the location counter to 2040. 
If the operand is omitted, the assembler 
sets the initial value to zero. The location 
counter is set at the next doubleword bound- 
ary when the value of the START operand is 
not divisible by 8. 

Note : The START instruction may not be 
preceded by any type of assembler language 
statement that may either affect or depend 
upon the setting of the Location Counter. 



CSECT — Identify Control Section 



( 



JName | operation j operand j 

| Any J START |A self-defining | 
j symbol or | jterm or not | 

j not used j jused j 

If a symbol names the START instruction, 
the symbol is established as the name of 
the control section. If not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section. This continues 
until an instruction identifying a different 
control section is encountered. A CSECT in- 
struction named by the same symbol that 
names a START instruction is considered to 
identify the continuation of the control 
section first identified by the START. 
Similarly, an unnamed CSECT that occurs in 



The CSECT instruction identifies the begin- 
ning or the continuation of a control sec- 
tion. The typical form of the CSECT 
instruction statement is as follows: 



JName | Operation j Operand | 

I Any | CSECT |Not used; should | 
I symbol or I |not be present I 

j not used j j I 

If a symbol names the CSECT instruction, 
the symbol is established as the name of 
the control section; otherwise the section 
is considered to be unnamed. All state- 
ments following the CSECT are assembled as 
part of that control section until a state- 
ment identifying a different control sec- 
tion is encountered (i.e., another CSECT or 
a DSECT instruction). 
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The symbol in the name field is a valid 
^ relocatable symbol whose value represents 
the address of the first byte of the con- 
trol section. It has a length attribute of 
one. 

Several CSECT statements with the same 
name may appear within a source module. The 
first is considered to identify the begin- 
ning of the control section; the rest iden- 
tify the resumption of the section. Thus, 
statements from different control sections 
may be interspersed. They are properly 
assembled (assigned contiguous storage 
locations) as long as the statements from 
the various control sections are identified 
by the appropriate CSECT instructions. 

Under the Tape Operating System (TOS) a 
completely empty control section (CSECT) is 
flagged in error. 



Unnamed Control Section 



If neither a named CSECT instruction nor 
START instruction appears at the beginning 
of the program, the assembler determines 
that it is to assemble an unnamed control 
section as the first (or only) control 
section. There may be only one unnamed 
control section in a program- If one is 
initiated and is then followed by a named 
control section, any subsequent unnamed 
CSECT statements are considered to resume 
the unnamed control section. If it is 
desired to write a small program that is 
unsectioned, the program does not need to 
contain a CSECT instruction. 



The symbol in the name field is a valid 
relocatable symbol whose value represents 
the first byte of the section. It has a 
length attribute of one. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT instruc- 
tion should precede each set of statements. 
When multiple DSECT instructions with the 
same name are encountered, the first is 
considered to initiate the dummy section 
and the rest to continue it. 

Symbols that name statements in a dummy 
section may be used in USING instructions. 
Therefore, they may be used in program 
elements (e.g., machine- instruct ions and 
data definitions) that specify storage 
addresses. An example illustrating the use 
of a dummy section appears subsequently 
under "Addressing Dummy Sections." 

Note ; A symbol that names a statement in 
a dummy section may be used in an A- type 
address constant only if it is paired with 
another symbol (with the opposite sign) 
from the same dummy section. 



Dummy Section Location Assignment; A Loca- 
tion Counter is used to determine the rela- 
tive locations of named program elements in 
a dummy section. The Location Counter is 
always set to zero at the beginning of the 
dummy section, and the location values 
assigned to symbols that name statements in 
the dummy section are relative to the ini- 
tial statement in the section. 



DSECT — Identify Dummy Section 



A dummy section represents a control sec- 
tion that is assembled but is not part of 
the object program. A dummy section is a 
convenient means of describing the layout 
of an area of storage without actually 
reserving the storage. (It is assumed that 
the storage is reserved either by some 
other part of this assembly or else by 
another assembly.) The DSECT instruction 
identifies the beginning or resumption of a 
dummy section. More than one dummy section* 
may be defined per assembly,, but each must 
be named. The typical form of the DSECT 
instruction statement is as follows: 



[Name 



I 

| An 

j ordinary 
I symbol or 
la variable 
'symbol 



Operation 



DSECT 



j Operand 
— 1 



1 

| Not used; should 1 
j not be present | 



Addressing Dummy Sections; The programmer 
may wish to describe the format of an area 
whose storage location will not be deter- 
mined until the program is executed. He 
can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the oper- 
ands of machine instructions. To effect 
references to the storage area, he does the 
following: 

1. Provides a USING statement specifying 
both a general register that the assem- 
bler can assign to the machine- 
instructions as a base register and a 
value from the dummy section that the 
assembler may assume the register con- 
tains. 

2. Ensures that the same register is load- 
ed with the actual address of the stor- 
age area. 

The values assigned to symbols defined 
in a dummy section are relative to the 
initial statement of the section. 
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Thus, all machine-instructions which 
refer to names defined in the dummy section 
will, at execution time, refer to storage 
locations relative to the address loaded 
into the register. 

An example is shown in the following 
coding. Assume that two independent modules 
(assembly 1 and assembly 2) have been loaded 
and are to be executed as a single overall 
program. Assembly 1 is an input routine 
that places a unit record in a specified 
area of storage, and places the address of 
that area in register 3. The input area is 
aligned on a fullword boundary. Then 
assembly 1 branches to assembly 2 . Assembly 
2 processes the record, which has the fol- 
lowing format: 



Columns 

1 

2 

3 and 4 

5 through 8 



Content 

INCODE 

blank 

INPUTA 

INPUTB 



The coding shown in the example is from 
assembly 2 . 

The input area is described in assembly 
2 by the DSECT control section named INAR- 
EA. Portions of the input area (i.e., 
record) that the programmer wishes to work 
with are named in the DSECT control section 
as shown. The assembler instruction USING 
INAREA,3 designates general register 3 as 
the base register to be used in addressing 
the DSECT control section, and that general 
register 3 is assumed to contain the 
address of INAREA. 

Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSECT section are defined rela- 



tive to the initial statement in the sec- 
tion, the address values they represent, 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 

The programmer must ensure that a section 
of code in his program is actually described 
by the dummy section which references it 
i.e., that data is properly aligned in both 
places. The DSECT named INAREA in the pre- 
vious example adequately describes the sec- 
tion of code introduced into assembly 1, as 
it was aligned on a full word boundary. 
Further, WORKA and WORKB will be aligned and 
contiguous to each other in the same way as 
INPUTA and INPUTB are. 

COM — DEFINE BLANK COMMON CONTROL SECTION 

The COM assembler instruction identifies 
and reserves a common area of storage that 
may be referred to by independent modules 
that have been linked and loaded for exe- 
cution as one overall program. 

Only one blank common control section 
may be designated in a source module. 
However, more than one COM statement may 
appear within a module. The first identi- 
fies the beginning of the blank common 
control section \ the rest identify the 
resumption of the section. 

When several modules are loaded, each 
designating a common control section, the 
amount of storage reserved is equal to the 
longest common control section. The form 
is: 



/"' 



| Name j Operation 

jA | COM 

I sequence j 
I symbol or | 
[not used I 



j Operand 

J Not used; should 
| not be present 



-J 



J 



i Name 


Operation 


l 


Operand 


! ASMBLY2 


CSECT 


1 




j BEGIN 


BALR 




2,0 




USING 




#,2 




USING 




INAREA, 3 




CLI 




INCODE^'A 1 




BE 




ATYPE 


! ATYPE 


MVC 




WORKA, INPUTA 




MVC 




WORKB , INPUTB 




CNOP 




2,4 


l WORKA 


DS 




H 


| WORKB 


DS 




F 


l INAREA 


DSECT 








CNOP 




0,4 


1 INCODE 


DS 




CLI 




DS 




CLI 


j INPUTA 


DS 




H 


j INPUTB 


DS 




F 




L END 







The common area may be broken up into 
subf ields through use of the DS and DC 
assembler instructions. Names of subf ields 
are defined relative to the beginning of 
the common section, as in the DSECT control 
section. 

It is necessary to establish address- 
ability relative to a named statement with- 
in COM since the COM statement itself can- 
not have a name. In the following example, 
addressability to the common area of stor- 
age is established relative to the named 
statement XYZ . 



{Name 




Operation 


r Operand i 


1 

IXYZ 
|PDQ 




L 
USING 
MVC 

COM 

DS 

DS 


! 8,=A(XYZ) j 
i XYZ 8 i 
j PDQ(16) ,=4C'ABCD' } 

j 16F J 
" 16C [ 
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— N No instructions or constants appearing 
s i in a common control section are assembled. 
v...,/ Data can only be placed in a common control 
section through execution of the program. 

If the assignment of common storage is 
done in the same manner by each independent 
assembly, reference to a location in common 
by any assembly results in the same loca- 
tion being referenced. When the blank 
common control section is assembled the 
initial value of the location counter is set 
to zero. 



SYMBOLIC LINKAGES 

Symbols may be defined in one module and 
referred to in another, thus effecting 
symbolic linkages between independently 
assembled program sections. The linkages 
can be effected only if the assembler is 
able to provide information about the link- 
age symbols to the linkage editor, which 
resolves these linkage references. The 
assembler places the necessary information 
in the external symbol dictionary on the 
basis of the linkage symbols identified by, 
e.g., the ENTRY and EXTRN instructions. 
Note that these symbolic linkages are des- 
cribed as linkages between independent 
modules; more specifically, they are link- 
ages between independently assembled control 
sections. 

In the module where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the Linkage Editor 
and Assembler by means of the ENTRY assem- 
bler instruction (unless the symbol is the 
name of a CSECT or START statement) . It is 
identified as a symbol that names an entry 
point, which means that another module may 
use that symbol in order to effect a branch 
operation or data reference. The assembler 
places this information in the external 
symbol dictionary. 

Similarly, the module that uses a sym- 
bol defined in some other module must 
identify it by the EXTRN or WXTRN assembler 
instruction. Since the definition of the 
symbol appears in another module, the 
assembler arbitrarily assigns a length 
attribute of 1 and a value of 0. The assem- 
bler places this information in the external 
symbol dictionary. 



have to be identified by an EXTRN or WXTRN 
statement. The V-type address constant is 
intended to be used for external branch 
references (i.e., for effecting branches to 
other programs) . Therefore, it should not 
be used for external data references (i.e., 
for referring to data in other modules) . 



ENTRY — IDENTIFY ENTRY-POINT SYMBOL 

The ENTRY instruction identifies linkage 
symbols that are defined in the module 
where the ENTRY instruction appears. 
These symbols can be referred to in other 
modules . 



K 



I Name | Operation j Operand | 

| ENTRY | One or more reloca- 

sequence j j table symbols, 

symbol orj | separated by 

not used j j commas, that also 

j | appear as state- 

j jment names 

I x j J 

A source module may contain a maximum of 
100 ENTRY symbols. ENTRY symbols which are 
not defined (not appearing as statement 
names) , although invalid, will also count 
towards this maximum. 

An ENTRY statement operand may not con- 
tain a symbol defined in a dummy section or 
in a blank common control section. An 
ENTRY statement containing a symbol defined 
in an unnamed control section can be pro- 
cessed by the assembler, but the DOS/TOS 
Linkage Editor will not process the result- 
ing deck. The following example identifies 
the statements named SINE and COSINE as 
entry points to the program. 



I T T 1 

| Name | Operation | Operand | 

| | ENTRY | SINE, COSINE | 



Note : Labels of START and CSECT statements 
are automatically treated as entry-points 
to a module. Thus they need not be identi- 
fied by ENTRY statements. 



J 



Another way to obtain symbolic linkages 
is by using the V-type address constant. 
The subsection "Data Definition Instructions" 
in Section 5 contains the details pertinent 
to writing a V-type address constant. It 
is sufficient here to note that this con- 
stant may be considered an indirect linkage 
point. It is created from an externally 
defined symbol, but that symbol does not 



EXTRN — IDENTIFY EXTERNAL SYMBOL 

The EXTRN instruction identifies linkage 
symbols used by one source module but identi- 
fied in another module. Each external symbol 
must be identified. This includes symbols 
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that refer to 
The format of 



T - 



control section names, 
the EXTRN statement is 



Name (operation | Operand 

I A j EXTRN | One or more relocata- j 
sequence j jble symbols, separated! 

symbol or j | by commas. | 

j_not_used_ J J j 



The symbols in the operand field may not 
appear as names of statements in the module. 
The following example identifies three ex- 
ternal symbols that have been used as 
operands in the module but are identified 
in some other module . 



| Name | operation | Operand 

| | EXTRN |RATEBL,PAYCALC 
| | EXTRN j WITHCALC 






An example that employs the EXTRN 
instruction appears subsequently under 
"Addressing External Control Sections.' 



Note I t A V-type address constant does 
not have to be identified by an EXTRN 
statement. 



Note 2 ; Only one external symbol may be 
used in an expression. 



Addressing External Control Sections 



A common way for a program to link to an 
external control section is to: 

1. Create a V-type address constant with 
the name of the external symbol. 



2. Load the constant into a general reg- 
ister and branch to the control section 
via the register. 



| Name | Operation j Operand 
MAINPROG | CSECT 



'1 , 

■K 



BEGIN 



VCON 



|BALR 
| USING 



1BALR 



| DC 

END 



|2,0 
I*, 2 



} 3, VCON 
|1,3 



| V (SINE) 
BEGIN 






The combined number of control sections 
and dummy sections plus the number of 

| unique symbols in EXTRN and WXTRN statements 
and V-type address constants may not exceed 
255. 

| (EXTRN and WXTRN statements are discussed 
in this section; V-type constants in Section 
5 under DC — Define Constant. ) If the same 
symbol appears in a V-type address constant 
and in the name entry of a CSECT or DSECT 
statement, it is counted as two symbols. 

For example, to link to the control 
section named SINE, the preceding coding 
might be used. 

An external symbol naming data may be 
referred to as follows: 

1. Identify the external symbol with the 
EXTRN instruction, and create an 
address constant from the symbol. 

2. Load the constant into a general reg- 
ister, and use the register for base 
addressing. 

For example, to use an area named 
RATETBL, which is in another control sec- 
tion, the following coding might be used: 



[Name | Operation j Operand 



MAINPROG 
BEGIN 



RATEADDR 



CSECT 

BALR 

USING 



EXTRN 



L 

USING 

A 



DC 

END 






2,0 
*,2 



RATETBL 



4, RATEADDR 
RATETBL, 4 
3, RATETBL 



A (RATETBL) 
BEGIN 
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WXTRN — Identify Weak External Symbol 
(DOS Assembler 14K D only) 

The WXTRN statement has the same format 
and almost the same use as the EXTRN state- 
ment. The only difference is that WXTRN 
suppresses the AUTOLINK function of the 
linkage editor for the symbols identified 
by it. Its format is: 



i Name { Operation | Operand i 


1 A ! WXTRN j One or more re- j 
i sequence | | locatable j 
J symbol or | i symbols, sep- j 
i not used | ! arated by commas J 



The AUTOLINK (automatic library look- 
up) function searches the relocatable li- 
brary for any unresolved external references, 
If it finds the external reference, it 
includes the module where the reference 
appears in the phase produced by the linkage 
editor. 



For more detailed information on 
AUTOLINK refer to IBM System/360 Disk 
O perating System; System Control and System 
Service Programs (GC24-5036) . 

Note ; AUTOLINK will be suppressed for a 
symbol defined both in a V-type address 
constant and in a WXTRN statement. 
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SECTION 4; MACHINE- INSTRUCTION S 



This section discusses the coding of the 
machine-instructions represented in the 
assembler language. The reader is reminded 
that the functions of each machine- 
instruction are discussed in the principles 
of operation manual (see Preface). 



MACHINE-INSTRUCTION STATEMENTS 



Machine- instructions may be represented 
symbolically as assembler language 
statements. The symbolic format of each 
varies according to the actual machine- 
instruction format, of which there are 
five: RR, RX, RS, SI, and SS. Within each 
basic format, further variations are 
possible. 

The symbolic format of a machine- 
instruction is similar to, but does not 
duplicate, its actual format. Appendix C 
illustrates machine format for the five 
classes of instructions. A mnemonic opera- 
tion code is written in the operation 
field, and one or more operands are written 
in the operand field. Comments may be 
appended to a machine- instruction statement 
as previously explained in Section 1. 

Any machine-instruction statement may be 
named by a symbol, which other assembler 
statements can use as an operand. The 
value attribute of the symbol is the 
address of the leftmost byte assigned to 
the assembled instruction. The length 
attribute of the symbol depends on the 
basic instruction format, as follows: 



Basic Format 


Lenqth Attribute 


RR 


2 


RX 


4 


RS 


4 


SI 


4 


SS 


6 



Instruction Alignment and Checking 



All ma chine- instructions are aligned 
automatically by the assembler on half-word 
boundaries. If any statement that causes 
information to be assembled requires align- 
ment, the bytes skipped are filled with 
hexadecimal zeros. All expressions that 
specify storage addresses are checked to 
insure that they refer to appropriate 
boundaries for the instructions in which 



they are used. Register numbers are also 
checked to make sure that they specify the 
proper registers, as follows: 

1. Floating-point instructions must spec- 
ify floating-point registers 0, 2, 4, 
or 6. 

2. Double-shift, full-word multiply, and 
divide instructions must specify an 
even-numbered general register in the 
first operand. 



OPERAND FIELDS AND SUBFIELDS 



Some symbolic operands are written as a 
single field and other operands are written 
as a field followed by one or two sub- 
fields. For example, addresses consist of 
the contents of a base register and a dis- 
placement. An operand that specifies a 
base and displacement is written as a, dis- 
placement field followed by a base register 
subfield, as follows: 40(5). In the RX 
format, both an index register subfield and 
a base register subfield are written as 
follows: 40(3,5). In the SS format, both a 
length subfield and a base register sub- 
field are written as follows: 40(21,5). 

Appendix C shows two types of addressing 
formats for RX, RS, SI, and SS instruc- 
tions. In each case, the first type shows 
the method of specifying an address expli- 
citly, as a base register and displacement. 
The second type indicates how to specify an 
implied address as an expression. 

For example, a load multiple instruction 
(RS format) may have either of the follow- 
ing symbolic operands: 



R1,R3,D2(B2) - 
R1,R3,S2 



- explicit address 

- implied address 



Whereas D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
either by a relocatable or an absolute 
expression. 

In order to use implied addresses, the 
following rules must be observed: 

1. The base register assembler instruc- 
tions (USING and DROP) must be used. 

2. An explicit base register designation 
must not accompany the implied 
address. 
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For example, assume that FIELD is a 
relocatable symbol, which has been assigned 
a value of 7400. Assume also that the 
assembler has been notified (by a USING 2. 
instruction) that general register 12 cur- 
rently contains a relocatable value of 4096 
and is available as a base register. The 
following example shows a machine- 
instruction statement as it would be 
written in assembler language and as it 
would be assembled- Note that the value of 
D2 is the difference between 7400 and 4096 
and that X2 is assembled as zero, since it 3. 
was omitted. The assembled instruction is 
presented in hexadecimal: 

Assembler statement: 



2,48(4,5) 
2 , FIELD 



(implied address) 



If the first subfield in the sequence 
is omitted, the comma that separates 
it from the second subfield is writ- 
ten. The parentheses must also be 
written. 

MVC 32(16,5) ,FIELD2 

MVC 32(,5) ,FIELD2 (implied length) 

If the second subfield in the sequence 
is omitted, the comma that separates 
it from the first subfield must be 
omitted. The parentheses must be 
written. 



ST 4, FIELD 
Assembled instruction: 



MVC 32(16,5) ,FIELD2 
MVC FIELD1(16),FIELD2 



(implied 
address) 



Op. Code 
50 



Rl X2 B2 
4 C 



D2 
CE8 



An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
formats shown in the first column of Table 
4-1. The address may be specified as an 
implied address by the formats shown in the 
second column. Observe that the two stor- 
age addresses required by the SS instruc- 
tions are presented separately; an implied 
address may be used for one while an expli- 
cit address is used for the other. 



Table 4-1. 



r t- 



Details of Address Specifi- 
cation 



| Type | Explicit Address) Implied Address 



H- 






RX 



|D2(X2,B2) 

|D2(,B2) 

|D2(B2) 

|D1(B1) 

|D1(L1,B1) 

|D1(L,B1) 

|D2(L2,B2) 



RS 
SI 
SS 



S2(X2) 

S2 

S2 

SI 

SKL1) 

SKL) 

S2(L2) 






A comma must be written to separate 
operands. Parentheses must be written to 
enclose a subfield or subfields, and a 
comma must be written to separate two sub- 
fields within parentheses. When parenthe- 
ses are used to enclose one subfield, and 
the subfield is omitted, the parentheses 
must be omitted. In the case of two sub- 
fields that are separated by a comma and 
enclosed by parentheses, the following 
rules apply: 

1. If both subfields are omitted, the 
separating comma and the parentheses 
must also be omitted. 



Fields and subfields in a symbolic oper- 
and may be represented either by absolute 
or by relocatable expressions, depending on 
what the field requires. (An expression 
has been defined as consisting of one term 
or a series of arithmetically combined 
terms. ) Refer to Appendix C for a detailed 
description of field requirements. 

Note : Blanks may not appear in an oper- 
and unless provided by a character self- 
defining term or a character literal. 
Thus, blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc- 



LENGTHS — EXPLICIT AND IMPLIED 



The length field in SS instructions can 
be explicit or implied. To imply a length, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either of the 
following: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 

In either case, the length attribute for 
an expression is the length of the leftmost 
term in the expression. The length attri- 
bute of asterisk (*) is equal to the length 
of the instruction in which it appears, 
except that in an EQU to * statement, the 
length attribute is 1. 
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By contrast, an explicit length is writ- 
ten by the programmer in the operand as an 
absolute expression. The explicit length 
overrides any implied length. 

Whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one ; less than 
the effective length in the machine- 
instruction statement. 

Note : If a length field of zero is 
desired, the length may be stated as zero 
or one. 

To summarize, the length required in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
Table 4-2 or may be implied by the formats 
shown in the second column. Observe that 
the two lengths required in one of the SS 
instruction formats are presented separate- 
ly. An implied length may be used for one 
while an explicit length is used for the 
other. 



Table U-2. Details of Length Specification 
in SS Instructions 

| Explicit Length j Implied Length | 



| Dl(Ll,Bl) 


D1(,B1) 


| Sl(Ll) 


SI 


| D1(L,B1) 


D1(,B1) 


| SKL) 


SI 


| D2<L2,B2) 


D2(,B2) 


| S2(L2) 


S2 



L_- 






J 



letters that correspond to those for the 
data types in the DC assembler instruction 
(see Section 5 ) . Furthermore, letters U 
and W have been added to indicate short and 
long, unnormalized floating-point opera- 
tions, respectively. For example, AE indi- 
cates Add Normalized Short, whereas AU 
indicates Add Unnormalized Short. Where 
applicable, full-word fixed-point data is 
implied if the data type is omitted. 



The letters R and I are added to the 
codes to indicate, respectively, RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 



MACHINE- INSTRUCTION MNEMONIC CODES 



MACHINE-INSTRUCTION EXAMPLES 



The examples that follow are grouped 
according to machine-instruction format. 
They illustrate the various symbolic oper- 
and formats. All symbols employed in the 
examples must be assumed to be defined 
elsewhere in the same assembly. All sym- 
bols that specify register numbers and 
lengths must be assumed to be equated else- 
where to absolute values. 

Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction are not considered 
here. For discussion of these considera- 
tions and for examples of coding sequences 
that illustrate them, refer to Section 3 , 
Program Sectioning and Linking , and Base 
Register Instructions . 



The mnemonic operation codes (shown in 
Appendix D ) are designed to be easily 
remembered codes that indicate the func- 
tions of the instructions. The normal 
format of the code is shown below; the 
items in brackets are not necessarily pre- 
sent in all codes: 

Verb [Modifier] [Data Type] [Machine Format] 

The verb, which is usually one or two 
characters, specifies the function. For 
example, A represents Add , and MV rep- 
resents Move. The function may be further 
defined by a modifier. For example, the 
modifier L indicates a logical function, as 
in AL for Add Logical and MV is modified by 
C (MVC) to indicate Move Characters. 

j Mnemonic codes for functions involving 
data usually indicate the data types, by 



RR Format 




| Name | Operation 

jALPHAl |LR 
| ALPHA2 j LR 
j BETA I SPM 
| GAMMAl | SVC 
j GAMMA2 | SVC 


| Operand | 

|1»2 | 
j REGl , REG2 j 

115 1 
|250 | 
|TEN | 



The operands of ALPHA1, BETA, and GAMMAl 
are decimal self-defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA2 and GAMMA2 are symbols 
that are equated elsewhere to absolute 
values. 



Machine-Instructions 
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RX Format 



SI Format 



| Name 
I __ 

| ALPHAl 
JALPHA2 
JBETA1 
1 BETA2 
I GAMMAl 
JGAMMA2 
JGAMMA3 
I LAMBDA! 



| Operation 

|L 
|L 



I Operand 



|1, 39(4, 10) 

|REG1,39(4,TEN) 

|2,ZETA(4) 

|REG2,ZETA(REG4) 

|2,ZETA 

JREG2,ZETA 

|2,=F , 1000" 

|3,20(,5) 



) 



JName 



|ALPHA1 
JALPHA2 
JBETA1 
J BETA2 
j GAMMAl 
JGAMMA2 
|GAMMA3 
|GAMMA4 



(Operation | Operand 

|CLI lUOW.X^UO' 

JCLI |40(REG9),TEN 

|CLI |ZETA,TEN 

|CLI IZETAfC'A* 

JSIO j 40 (9) 

|SIO 1 0(9) 

JSIO |40(0) 

j SIO | ZETA 






X- 



Both ALPHA instructions specify explicit 
addresses; REG1 and TEN are absolute sym- 
bols. Both BETA instructions specify 
implied addresses* and both use index reg- 
isters- Indexing is omitted from the GAMMA 
instructions- GAMMAl and GAMMA2 specify 
implied addresses. The second operand of 
GAMMA3 is a literal. LAMBDA1 specifies no 
indexing. 



RS Format 



(Name 



|0 per at ion 
4 



JALPHA1 |BXH 

|ALPHA2 |BXH 

JALPHA3 JBXH 

| ALPHA4 j SLL 

|ALPHA5 |SLL 






j Operand 

|l f 2, 20(14) 

j REG1 ,REG2, 20 (REGD) 

|REG1,REG2,ZETA 

|REG2,15 

|REG2,0(15) 



Whereas ALPHAl and ALPHA2 specify ex- 
plicit addresses, ALPHA3 specifies an 
implied address. ALPHA4 is a shift 
instruction shifting the contents of REG 2 
left 15 bit positions. ALPHA 5 is a shift 
instruction shifting the contents of REG2 
left by the value contained in general 
register 15. 



The ALPHA instructions and GAMMA1-GAMMA3 
specify explicit addresses, whereas the 
BETA instructions and GAMMA4 specify 
implied addresses. GAMMA2 specifies a 
displacement of zero. GAMMA3 does not 
specify a base register. 



SS Format 



| Operation | Operand 



JName 

JALPHA1 |AP |40(9,8),30(6,7) 

|ALPHA2 |AP |40(NINE,REG8),30(L6,7) 

JALPHA3 JAP |FIELD2,FIELD1 

JALPHA4 |AP |FIELD2(9),FIELD1(6) 

| BETA | AP | FIELD2 ( 9) , FIELDl 

| GAMMAl JMVC | 40 (9, 8) , 30(7) 

|GAMMA2 JMVC j 40 (NINE,REG8) ,DEC (7) 

| GAMMA3 j MVC | FIELD2 , FIELDl 

JGAMMA4 JMVC | FIELD2 (9) , FIELDl 



ALPHAl, ALPHA2, GAMMAl, and GAMMA2 spec- 
ify explicit lengths and addresses. ALPHA3 
and GAMMA3 specify both implied length and 
implied addresses. ALPHA4 and GAMMA4 spec- 
ify explicit length and implied addresses. 
BETA specifies an explicit length for 
FIELD2 and an implied length for FIELDl; 
both addresses are implied. 



EXTENDED MNEMONIC CODES 



For the convenience of the programmer, the 
assembler provides extended mnemonic codes, 
which allow conditional branches to be 
specified mnemonically as well as through 
the use of the BC machine-instruction. 
These extended mnemonic codes specify both 
the machine branch instruction and the 
condition on which the branch is to occur. 
The codes are not part of the universal set 
of machine- instruct ions, but are translated 
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"~N 



) 



O 



Extended code 



B 


D2(X2,B2) 


BR 


R2 


NOP 


D2(X2,B2) 


NOPR 


R2 




Used After 


BH 


D2(X2,B2) 


BL 


D2(X2,B2) 


BE 


D2(X2,B2) 


BNH 


D2(X2,B2) 


BNL 


D2(X2,B2) 


BNE 


D2(X2 r B2) 




Used After 


BO 


D2(X2,B2) 


BP 


D2(X2,B2) 


BM 


D2(X2,B2) 


BZ 


D2(X2,B2) 


BNP 


D2(X2,B2) 


BNM 


D2(X2.B2) 


BNZ 


D2(X2,B2) 




Used After 



Meaning 

Branch Unconditional 

Branch Unconditional (RR format) 

No Operation 

No Operation (RR format) 

Compare Instructions 

Branch on High 
Branch on Low 
Branch on Equal 
Branch on Not High 
Branch on Not Low 
Branch on Not Equal 



Branch on Overflow 
Branch on Plus 
Branch on Minus 
Branch on Zero 
Branch on Not Plus 
Branch on Not Minus 
Branch on Not Zero 

Test Under Mask Instructions 



BO D2(X2,B2) 

BM D2(X2,B2) 

BZ D2(X2,B2) 

BNO D2(X2,B2) 

Figure 4-1. Extended Mnemonic Codes 



Branch if Ones 
Branch if Mixed 
Branch if Zeros 
Branch if Not Ones 



Machine- Instruction 

BC 15,D2(X2,B2) 
BCR 15, R2 
BC 0,D2(X2,B2) 
BCR 0,R2 



BC 2,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 13,D2(X2,B2) 
BC 11,D2(X2,B2) 
BC 7,D2(X2,B2) 



BC 1,D2(X2,B2) 
BC 2,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 13,D2(X2,B2) 
BC ll # D2(X2 f B2) 
BC 7,D2(X2,B2) 



BC 1,D2(X2,B2) 
BC 4,D2(X2,B2) 
BC 8,D2(X2,B2) 
BC 14,D2(X2,B2) 






by the assembler into the corresponding 
operation and condition combinations. 

The allowable extended mnemonic codes 
and their operand formats are shown in 
Figure 4-1, together with their machine- 
instruction equivalents. Unless otherwise 
noted, all extended mnemonics shown are for 
instructions in the RX format. Note that 
the only difference between the operand 
fields of the extended mnemonics and those 
of their machine- instruction equivalents is 
the absence of the Rl field and the comma 
that separates it from the rest of the 
operand field. The extended mnemonic list, 
like the machine-instruction list, shows 
explicit address formats only. Each 
address can also be specified as an implied 
address. 

In the following examples, which illus- 
trate the use of extended mnemonics, it is 
to be assumed that the symbol GO is defined 
elsewhere in the program. 



| Name 
j. 



| Operation | Operand 

|B |40(3,6) 

jB |40(,6) 

JBL | GOO) 

j BL | GO 

| BR j 4 

[NOP JG0(3) 



1 

I 

—A 



J 



The first two instructions specify an 
unconditional branch to an explicit 
address. The address in the first case is 
the sum of the contents of base register 6, 
the contents of index register 3, and the 
displacement 4 0; the address in the second 
instruction is not indexed. The third 
instruction specifies a branch on low to 
the address implied by GO as indexed by the 
contents of index register 3; the fourth 
instruction does not specify an index reg- 
ister. The next instruction is an uncondi- 
tional branch to the address contained in 
register 4. The last instruction is a 
"no operation" . It will not branch under 
any condition because the mask field is 
zero. 



Machine-Instructions 
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SECTION 5: ASSEMBLER INSTRUCTION STATEMENTS 



Just as machine instructions are used to 
request the computer to perform a sequence 
of operations during program execution 
time, so assembler instructions are 
requests to the assembler to perform cer- 
tain operations during the assembly. 
Assembler-instruction statements, in 
contrast to machine- instruction statements, 
do not always cause machine-instructions to 
be included in the assembled program. 
Some, such as DS and DC, generate no 
instructions but do cause storage areas to 
be set aside for constants and other data. 
Others, such as EQU and SPACE, are effec- 
tive only at assembly time; they generate 
nothing in the assembled program and have 
no effect on the Location counter. 

The following is a list of all the 
assembler instructions. 



SYMBOL DEFINITION INSTRUCTION 



EQU — EQUATE SYMBOL 



The EQU instruction is used to define a 
symbol by assigning to it the length, 
value, and relocat ability attributes of an 
expression in the operand field. The typi- 
cal form of the EQU instruction statement 
is as follows: 



Symbol Definition Instruction 
EQU - Equate Symbol 

Data Definition Instructions 

DC - Define constant 

DS - Define Storage 

CCW - Define Channel Command Word 

* Program Sectioning and Linking Instructions 

START - Start Assembly 
CSECT - Identify Control Section 
DSECT - Identify Dummy Section 
ENTRY - Identify Entry-Point Symbol 
EXTRN - Identify External Symbol 
WXTRN - Identify Weak External Symbol 
COM - Identify Blank Common Control 



I Name J Operation 

I A variable |EQU 

'symbol or f J 

Jan ordinary! | 

if I 1 ?- - 1 - I 1. 



j Operand 



| An expression 



The expression in the operand field may 
be absolute or relocatable. Any symbols 
appearing in the expression must be pre- 
viously defined. 



The symbol in the name field is given 
the same attributes as the expression in 
the operand field. The length attribute of 
the symbol is that of the leftmost (or 
only) terra of the expression. When that 
term is * or a self-defining term, the 
length attribute is 1. The value attribute 
of the symbol is the value of the expres- 
sion. 



* Base Register Instructions 
USING - Use Base Address Register 
DROP - Drop Base Address Register 

Listing Control Instructions 

TITLE - Identify Assembly Output 

EJECT - Start New Page 

SPACE - Space Listing 

PRINT - Print Optional Data 

Program Control Instructions 

ICTL - Input Format Control 

ISEQ - Input Sequence Checking 

ORG - Set Location counter 

LTORG - Begin Literal Pool 

CNOP - Conditional No Operation 

COPY - Copy Predefined Source Coding 

END - End Assembly 

PUNCH - Punch a Card 

REPRO - Reproduce Following Card 

* Discussed in Section 3. 



The EQU instruction is the means of 
equating symbols to register numbers, 
immediate data, and other arbitrary values. 
The following examples illustrate how this 
might be done: 



j Name | Operation 

| REG2 | EQU 
j TEST j EQU 



J Operand | 

|2 (general register) j 

JX^F' (immediate data) j 

L J 



To reduce programming time, the program- 
mer can equate symbols to frequently used 
expressions and then use the symbols as 
operands in place of the expressions. 
Thus, in the statement 
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I Name j Operation j Operand 
j. + .j 



I 



| FIELD J EQU 
I L__ 



| ALPHA-BETA+ GAMMA | 
.J j 



FIELD is defined as ALPHA- BETA+ GAMMA and 
may be used in place of it- Note, however, 
that ALPHA, BETA, and GAMMA must all be 

previously defined. If the final result of 
the expression is negative, the low order 
24 bits of the 2s complement is used. 



DATA DEFINITION INSTRUCTIONS 



There are three data definition instruction 
statements: Define Constant (DC), Define 
Storage (DS), and Define Channel Command 
Word (CCW). 

These statements are used to enter data 
constants into storage, to define and re- 
serve areas of storage, and to specify the 
contents of channel command words. The 
statements may be named by symbols so that 
other program statements can refer to the 
fields generated from them- The discussion 
of the DC instruction is far more extensive 
than that of the DS instruction, because 
the DS instruction is written in the same 
format as the DC instruction and may speci- 
fy some or all of the information that the 
DC instruction provides. Only the function 
and treatment of the statements vary. For 
this reason, the DC instruction is present- 
ed first and discussed in more detail than 
the DS instruction. 



DC — DEFINE CONSTANT 



The DC instruction is used to provide con- 
stant data in storage. It may specify one 
constant or a series of constants, thereby 
relieving the programmer of the necessity 
to write a separate data definition state- 
ment for each constant desired. Further- 
more, a variety of constants may be speci- 
fied: fixed-point, floating-point, decimal, 
hexadecimal, character, and storage 
addresses. (Data constants are generally 
called constants unless they are created 
from storage addresses, in which case they 
are called address constants. ) The typical 
form of the DC instruction statement is as 
follows: 









i Name i 


Operation 


1 Operand i 


l Any | 


DC 


1 One operand (D as- \ 


I symbol or' 




J sembler) or one or I 


i not used j 




i more operands (F [ 
1 assembler) in the ( 
1 format described | 
! below, each separ- 1 






1 ated by a comma. ' 



Each operand consists of four subfields; 
the first three describe the constant, and 
the fourth subfield provides the constant 
or constants. The first and third sub- 
fields may be omitted, but the second and 
fourth must be specified. Note that more 
than one constant may be specified in the 
fourth subfield for most types of con- 
stants. Each constant so specified must be 
of the same type; the descriptive subfields 
that precede the constants apply to all of 
them. No blanks may occur within any of 
the subfields (unless provided as charac- 
ters in a character constant or a character 
self-defining term), nor may they occur 
between the subfields of an operand. Sim- 
ilarly, blanks may not occur between 
operands and the commas that separate them 
when multiple operands are being specified. 

The subfields of the DC operand are 
written in the following sequence: 



I Subfield | 

| 1 2 3 4 | 

| Dupli- | Type | Modifiers | Constant ( s ) j 
j cat ion j | j | 

j Factor j j j j 

The symbol that names the DC instruction 
is the name of the constant (or first con- 
stant if the instruction specifies more 
than one). Relative addressing (e.g., 
SYMBOL* 2) may be used to address the var- 
ious constants if more than one has been 
specified, because the number of bytes 
allocated to each constant can be deter- 
mined. 

The value attribute of the symbol naming 
the DC instruction is the address of the 
leftmost byte (after any necessary 
alignment) of the first, or only, constant. 
The length attribute depends on two things: 
the type of constant being defined and the 
presence of a length specification. 
Implied lengths are assumed for the various 
constant types in the absence of a length 
specification. If more than one constant 
is defined, the length attribute is the 
length in bytes (specified or implied) of 
the first constant. 
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Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification. 
Some constant types are only aligned to a 
byte boundary, but the DS instruction can 
be used to force any type of word boundary 
alignment for them. This is explained 
under "DS — Define Storage. " Other con- 
stants are aligned at various word boundar- 
ies (half, full, or double) in the absence 
of a length specification. If length is 
specified, no boundary alignment occurs for 
such constants. 

Bytes that must be skipped in order to 
align the field at the proper boundary are 
not considered to be part of the constant. 
In other words, the Location Counter is 
incremented to reflect the proper boundary 
(if any incrementing is necessary) before 
the address value is established. Thus, 
the symbol naming the constant will not 
receive a value attribute that is the loca- 
tion of a skipped byte. 

Any bytes skipped in aligning statements 
that do not cause information to be assem- 
bled are not zeroed. Thus bytes skipped to 
align a DC statement are zeroed, and bytes 
skipped to align a DS statement are not 
zeroed. 

Appendix F summarizes, in chart form, 
the information concerning constants that 
is presented in this section. 

LITERAL DEFINITIONS; The reader is remind- 
ed that the discussion of literals as 
ma chine- instruct ion operands (in Section 2) 
referred him to the description of the DC 
operand for the method of writing a literal 
operand. All subsequent operand specifi- 
cations are applicable to writing literals, 
the only differences being: 



1. 
2. 



3. 



4. 



5. 



The literal is preceded by an = sign. 
Unsigned decimal values must be used 
to express the duplication factor and 
length modifier values. 
The duplication factor may not be 
zero. 

S-type address constants may not be 
specified. 

Signed or unsigned decimal values must 
be used for exponent and scale modifi- 
er values. 



Examples of literals appear throughout 
the balance of the DC instruction discus- 
sion. 



Operand Subfield 1: Duplication Factor 



The duplication 'factor may be omitted. If 
specified, it causes the constant (s) to be 
generated the number of times indicated by 



the factor. The factor may be specified 
either by an unsigned decimal self-defining 
term or by a positive absolute expression 
that is enclosed by parentheses. The 
duplication factor is applied after the 
constant is assembled. All symbols in the 
expression must be previously defined. 

Note that a duplication factor of zero 
is permitted except in a literal and 
achieves the same result as it would in a 
DS instruction. A DC instruction with a 
zero duplication factor will not produce 
control dictionary entries. See "Forcing 
Alignment" under "DS — Define Storage." 

Note : If duplication is specified for an 
address constant containing a Location 
Counter reference, the value of the Loca- 
tion Counter used in each duplication is 
incremented by the length of the operand. 

Operand Subfield 2: Type 



The type subfield defines the type of con- 
stant being specified. From the type 
specification, the assembler determines how 
it is to interpret the constant and trans- 
late it into the appropriate machine for- 
mat. The type is specified by a single- 
letter code as shown in Figure 5-1. 

Further information about these 
constants is provided' in the discussion of 
the constants themselves under "Operand 
Subfield 4: Constant." 



Operand Subfield 3: Modifiers 



Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length) , and the scaling and expo- 
nent for the constant. If multiple modifi- 
ers are written, they must appear in this 
sequence: length, scale, exponent. Each is 
written and used as described in the fol- 
lowing text. 

LENGTH MODIFIER: This is written as Ln, 
where n is either an unsigned decimal self- 
defining term or a positive absolute 
expression enclosed by parentheses. Any 
symbols in the expression must be previous- 
ly defined. The value of n represents the 
number of bytes of storage that are assem- 
bled for the constant. The maximum value 
permitted for the length modifiers supplied 
for the various types of constants is sum- 
marized in Appendix F. This table also 
indicates the implied length for each type 
of constant; the implied length is used 
unless a length modifier is present. A 
length modifier may be specified for any 
type of constant. However, no boundary 
alignment will be provided when a length 
modifier is given. 



V. 



40 



r 



Code Type of Constant Machine Format 



C 
X 
B 

F 



E 






Character 
Hexadecimal 
Binary 
Fixed- point 

Fixed-point 

Floating-point 

F loa ting- poi nt 

Decimal 
Decimal 
Address 
Address 
Address 

Address 



8 -bit code for each character 

1- bit code for each hexadecimal digit 

binary format 

Signed, fixed- point binary format; 

normally a full word 

Signed, fixed-point binary format; 

normally a half word 

Short floating-point format; 

normally a full word 

Long floating-point format; 

normally a double word 

Packed decimal format 

Zoned decimal format 

Value of address; normally a full word 

Value of address; normally a half word 

Base register and displacement value; 

a half word 

Space reserved for external 

symbol addresses; each 

address normally a full word 



Figure 5-1. Type Codes for Constants 



Bit-Length Specification (F assembler only) ; 
The length of a constant, in bits, is spec- 
ified by L.n, where n is specified as stated 
above and represents the number of bits in 
storage into which the constant is to be 
assembled. The value of n may exceed eight 
and is interpreted to mean an integral num- 
ber of bytes plus so many bits. For exam- 
ple, L.20 is interpreted as a length of two 
bytes plus four bits. 

Assembly of the first or only constant 
with bit-length specification starts on a 
byte boundary. The constant is placed in 
the high or low order end of the field de- 
pending on the type of . constant being 
specified. The constant is padded or trun- 
cated to fit the field. If the assembled 
length does not leave the location counter 
set at a byte boundary, and another bit 
length constant does not immediately follow 
in the same statement, the remainder of the 
last byte used is filled with zeros. This 
leaves the location counter set at the next 
byte boundary. Figure 5-2 shows a fixed- 
point constant with a specified bit-length 
of 13, as coded, and as it would appear in 
storage. Note that the constant has been 
padded on the left to bring it to its 
designated 13-bit length. 

As coded: 

. T T _ j 

J Name I Operation J Operand I 



I 

i BLCON 



DC 



FL.13'579 



byte byte byte 
padding 

oooiooiolooonooo 



579 fill 

Figure 5-2. Bit-Length Specification 
(Single Constant) 

The implied length of BLCON is two bytes. 
A reference to BLCON would cause the entire 
two bytes to be referenced. 

When bit-length specification is used in 
association with multiple constants (see 
"Operand Subfield 4: Constant" following), 
each succeeding constant in the list is 
assembled starting at the next available 
bit. Figure 5-3 illustrates this. 

As coded : 

, T T • , 

I Name I Operation I Operand I 

I T T 1 

IBLMCONI DC I FL. 10' 161 ,21,57' I 
' 1 1 ! 



In storage: 



byte byte 



00101000 



byte 



padding 



byte 



byte 



01000001101010 

-A. 



padding 

.'ooooli 



161 



■~v— 

21 



1100100 
*^r> 



57 



fill 



In storage: 



Figure 5-3. Bit-Length Specification 
(Multiple Constants) 
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The symbol used as a name entry in a DC 

assembler instruction takes on the length 

attribute of the first constant in the 

list; therefore the implied length of 
BLMCON in Figure 5-3 is two bytes. 

If duplication is specified, filling 
occurs once at the end of the field occu- 
pied by the duplicated constant (s) . 

When bit-length specification is used in 
association with multiple operands, assem- 
bly of the constant (s) in each succeeding 
operand starts at the next available bit. 
Figure 5-4 illustrates this. 

As coded: 



jOper- 

Name I at ion 
I 



Operand 



BLMOCON I DC 
1__. 



FL.7'9' ,CL.10'AB' ,XL.14'C4M 



In storage: 

byte byte 
padding 



byte byte 
padding • 



OOOlOOllLLOOOOOllI 



byte 



1000000110001000 



^ v_ 



C4 



c fill 



A plus 
first two 
bits of B 



Figure 5-4. Bit-Length Specification 
(Multiple Operands) 

In Figure 5-4, three different types of 
constants have been specified, one to an 
operand. Note that the character constant 
'AB' which normally would occupy 16 bits is 
truncated on the right to fit the 10-bit 
field designated. Note that filling occurs 
only at the end of the field occupied by 
all the constants. 



SCALE MODIFIER: This modifier is written 
as Sn, where n is either a decimal value or 
an absolute expression enclosed by paren- 
theses. Any symbol in the expression must 
be previously defined. The decimal value 
or the parenthesized expression may be 
preceded by a sign; if none is present, a 
plus sign is assumed. The maximum values 
for scale modifiers are summarized in 
Appendix F. 

A scale modifier may be used with fixed- 
point (F, H) and floating-point <E, D) 
constants only, it is used to specify the 



amount of internal scaling that is desired, 
as follows. 

Scale Modifier for Fixed-Point Constants: 
the scale modifier specifies the power of 
two by which the constant must be 
multiplied after it has been converted to 
its binary representation. Just as multi- 
plication of a decimal number by a power of 
10 causes the decimal point to move, multi- 
plication of a binary number by a power of 
two causes the binary point to move. This 
multiplication has the effect of moving the 
binary point away from its assumed position 
in the binary field; the assumed position 
being to the right of the rightmost posi- 
tion. 

Thus, the scale modifier indicates ei- 
ther of the following: (1) the number of 
binary positions to be occupied by the 
fractional portion of the binary number, or 
(2) the number of binary positions to be 
deleted from the integral portion of the 
binary number. A positive scale of x 
shifts the integral portion of the number x 
binary positions to the left, thereby re- 
serving the rightmost x binary positions 
for the fractional portion. A negative 
scale shifts the integral portion of the 
number right, thereby deleting rightmost 
integral positions. If a scale modifier 
does not accompany a fixed-point constant 
containing a fractional part, the fraction- 
al part is lost. 

In all cases where positions are lost 
because of scaling (or the lack of 
scaling) , rounding occurs in the leftmost 
bit of the lost portion. The rounding is 
reflected in the rightmost position saved. 

Scale Modifier for Floating-Point Con- 
stants : Only a positive scale modifier may 
be used with a floating-point constant. It 
indicates the number of hexadecimal posi- 
tions that the fraction is to be shifted to 
the right. Note that this shift amount is 
in terms of hexadecimal positions, each of 
which is four binary positions. (A posi- 
tive scaling actually indicates that the 
point is to be moved to the left. However, 
a floating-point constant is always con- 
verted to a fraction, which is hexadeci- 
mally normalized. The point is assumed to 
be at the left of the leftmost position in 
the field. Since the point cannot be moved 
left, the fraction is shifted right.) 

Thus, scaling that is specified for a 
floating-point constant provides an assem- 
bled fraction that is unnormalized, i.e., 
contains hexadecimal zeros in the leftmost 
positions of the fraction. When the frac- 
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tion is shifted, the exponent is adjusted 
accordingly to retain the correct magni- 
tude- When hexadecimal positions are lost, 
rounding occurs in the leftmost hexadecimal 
position of the lost portion. The rounding 
is reflected in the rightmost hexadecimal 
position saved. 

EXPONENT MODIFIER; This modifier is writ- 
ten as En, where n is either a decimal 
self-defining term or an absolute expres- 
sion enclosed by parentheses. Any symbols 
in the expression must be previously 
defined. The decimal value or the paren- 
thesized expression may be preceded by a 
sign; if none is present, a plus sign is 
assumed. The maximum values for exponent 
modifiers are summarized in Appendix F . 

An exponent modifier may be used with 
fixed-point (F, H) and floating-point (E, 
D) constants only. The modifier denotes 
the power of 10 by which the constant is to 
be multiplied before its conversion to the 
proper internal format. 

This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under "Operand Subfield 4: con- 
stant. " Both are denoted in the same 
fashion, as En. The exponent modifier 
affects each* constant in the operand, 
whereas the exponent written as part of the 
constant only pertains to that constant. 
Thus, a constant may be specified with an 
exponent of +2, and an exponent modifier of 
+5 may precede the constant. In effect, 
the constant has an exponent of +7. 

Note that there is a maximum value, both 
positive and negative, listed in Appendix F 
for exponents. This applies to the expo- 
nent modifier and to the sum of the expo- 
nent modifier and the exponent specified as 
part of the constant. 



Operand Subfield 4; Constant 



This subfield supplies the constant (or 
constants) described by the subfields that 
precede it. A data constant (all types 
except A,Y,S,and V) is enclosed by apos- 
trophes . An address constant (types A, Y, 
S, and V) is enclosed by parentheses. To 
specify two or more constants in the sub- 
field, the constants must be separated by 
commas and the entire sequence of constants 
must be enclosed by the appropriate delimi- 
ters (i.e., apostrophes or parentheses). 
Thus, the format for specifying the 
constant (s) is one of the following: 



Single 
Constant 



Multiple 
Constants* 



•constant* 'constant,... , constant* 
(constant) (constant,. .-, constant) 

* Not permitted for character, hexadecimal, 
and binary constants. 

All constant types except character (C), 
hexadecimal (X), binary (B) , packed decimal 
(P) , and zoned decimal (Z) , are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 
In the presence of a length modifier, no 
boundary alignment is performed. If the 
operand specifies more than one constant, 
any necessary alignment applies to the 
first constant only. Thus, for an operand 
that provides five full-word constants, the 
first would be aligned on a full-word 
boundary, and the rest would automatically 
fall on full-word boundaries. 

The total storage requirement of the 
operand is the product of the length times 
the number of constants in the operand 
times the duplication factor (if present) 
plus any bytes skipped for boundary align- 
ment. 

If an address constant contains a Loca- 
tion counter reference, the Location Count- 
er value that is used is the storage 
address of the first byte the constant will 
occupy. Thus, if several address constants 
in the same instruction refer to the Loca- 
tion Counter, the value of the Location 
Counter varies from constant to constant. 
Similarly, if a single constant is speci- 
fied (and it is a Location Counter 
reference) with a duplication factor, the 
constant is duplicated with a varying Loca- 
tion Counter value - 

E and H constants are converted as if 
they were D and F, respectively, and then 
shortened. 

The subsequent text describes each of 
the constant types and provides examples. 



Character Constant — C; Any of the valid 
256 punch combinations may be designated in 
a character constant. Only one character 
constant may be specified per statement. 

Special consideration must be given to 
representing apostrophes and ampersands as 
characters. Each apostrophe or ampersand 
desired as a character in the constant must 
be represented by a pair of apostrophes or 
ampersands. Only one apostrophe or amper- 
sand appears in storage. 

The maximum length of a character con- 
stant is 256 bytes. No boundary alignment 
is performed. Each character is translated 
into one byte. Double apostrophes or dou- 
ble ampersands count as one character. If 
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no length modifier is given, the size in 
bytes of the character constant is equal to 
the number of characters in the constant. 
If a length modifier is provided, the 
result varies as follows: 



1. If the number of characters in the 
constant exceeds the specified length, 
as many rightmost bytes as necessary 
are dropped. 

2. If the number of characters is less 
than the specified length, the excess 
rightmost bytes are filled with 
blanks . 

In the following example, the length 
attribute of FIELD is 12: 



| Name | Operation | Operand 
1 + -I 



1 

I 
1 

|FIEID |DC jC'TOTAL IS 110' j 



However, in this next example, the 
length attribute is 15, and three blanks 
appear in storage to the right of the zero: 



Name 



| Operation | Operand | 

I- + H 1 

| FIELD JDC |CL15« TOTAL IS 110* j 



In the next example, the length attri- 
bute of FIELD is 12, although 13 characters 
appear in the operand. The two ampersands 
count as only one byte. 



i r r 

| Name | Operation | Operand 

| FIELD | DC | C* TOTAL IS g&10* 



— T 
I 

-H 

I 
I 



been specified as six instead of four, the 
generated constant would have been: 

ABODE ABODE ABODE 

Note that the same constant could be 
specified as a literal. 



| Name | Operation | Operand j 

| + + ., 

j |MVC lAREA^^SCL^ABCDE' j 



Hexadecimal Constant — X: A hexadecimal 
constant consists of one or more of the 
hexadecimal digits, which are 0-9 and A-F. 
Only one hexadecimal constant may be speci- 
fied per statement. The maximum length of 
a hexadecimal constant is 256 bytes (512 
hexadecimal digits). No word boundary 
alignment is performed. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
of digits is specified, the leftmost byte 
has the leftmost four bits filled with a 
hexadecimal zero, while the rightmost four 
bits contain the odd (first) digit. 

If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the con- 
stant (assuming that a hexadecimal zero is 
added to an odd number of digits ) . If a 
length modifier is given, the constant is 
handled as follows: 

1. If the number of hexadecimal digit 
pairs exceeds the specified length, 
the necessary leftmost bits (and/ or 
bytes) are dropped. 

2. If the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits (and/or 
bytes) are added to the left and 
filled with hexadecimal zeros. 



Note that in the next example, a length 
of four has been specified, but there are 
five characters in the constant. 



j Name j Operation | Operand 

| FIELD | DC jacLU'ABCDE* 
L j. j 



1 

I 

I 



The generated constant would be: 
ABCDABCDABCD 

On the other hand, if the length had 



An eight-digit hexadecimal constant 
provides a convenient way to set the bit 
pattern of a full binary word. The con- 
stant in the following example would set 
the first and third bytes of a word to l*s. 



JName j Operation | Operand | 

I IDS | OF | 

jTEST JDC |X'FF00FF00' | 



The DS instruction sets the location 
counter to a full word- boundary. 
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The next example uses a hexadecimal 
constant as a literal and inserts Is into 
bits 24 through 31 of register 5. 



r r T ^ 

| Name | Operation j Operand | 

| |IC |5,=X , FF t INSERT CHAR. | 

In the following example, the digit A 
would be dropped, because five hexadecimal 
digits are specified for a length of two 
bytes : 



| Name | operation | Operand 

I- 1 f 

| ALPHACON | DC 

I I 






|3XL2*A6F4E* 
I 

— L 



The resulting constant would be 6F4E, 
which would occupy the specified two bytes. 
It would then be duplicated three times, as 
requested by the duplication factor. If it 
had merely been specified as X*A6F4E f , the 
resulting constant would have had a hexa- 
decimal zero in the leftmost position: 

0A6F4E 



Binary Constant — B: A binary constant is 
written using l*s and 0*s enclosed in apos- 
trophes- only one binary constant may be 
specified in a statement. Duplication and 
length may be specified. The maximum 
length of a binary constant is 256 bytes. 

The implied length of a binary constant 
is the number of bytes occupied by the 
constant including any padding necessary. 
Padding or truncation takes place on the 
left. The padding bit used is a 0. 

The following example shows the coding 
used to designate a binary constant. BCON 
would have a length attribute of one. 



4 



JName j Operation | Operand 

j BCON j DC 

I BTRUNC j DC 

| BPAD j DC 



— • I 



IB'IIOIHOI* 

| BL1* 100100011 • | 

|BLl , 101 f | 



BTRUNC would assemble with the leftmost 
bit truncated, as follows: 

00100011 

BPAD would assemble with five zeros as 
padding, as follows: 



00000101 

Fixed-Point Constants — F and H: A fixed- 
point constant is written as a decimal 
number, which may be followed by a decimal 
exponent if desired. The number may be an 
integer, a fraction, or a mixed number 
(i.e., one with integral and fractional 
portions). The format of the constant is 
as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be 
omitted, in which case the number is 
assumed to be an integer. A positive 
sign is assumed if an unsigned number 
is specified. Unless a scale modifier 
accompanies a mixed number or frac- 
tion, the fractional portion is lost, 
as explained .under Subfield 3: Modifi- 
ers . 

2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci- 
fying the exponent of the factor 10. 
The exponent may be in the range -85 
to +75. If an unsigned exponent is 
specified, a plus sign is assumed. 
The exponent causes the value of the 
constant to be adjusted by the power 
of 10 that it specifies- The exponent 
may exceed the permissible range for 
exponents provided that the sum of the 
exponent and the exponent modifier do 
not exceed that range. 

The number is converted to a binary 
number. The binary number is then rounded 
and assembled into the proper field, 
according to the specified or implied 
length. If the value of the number exceeds 
the length specified or implied, the sign 
is lost, the necessary leftmost bits are 
truncated to the length of the field and 
the value is then assembled into the whole 
field. Any duplication factor that is 
present is applied after the constant is 
assembled. A negative number is carried in 
2*s complement form. The resulting number 
will not differ from the exact value by 
more than one in the last place. 

An implied length of four bytes is 
assumed for a full-word (F) and two bytes 
for a half-word (H) , and the constant is 
aligned to the proper full -word or half- 
word boundary, if a length is not 
specified. However, any length up to and 
including eight bytes may be specified for 
either type of constant by a length modifi- 
er, in which case no boundary alignment 
occurs . 

Maximum and minimum values, exclusive of 
scaling, for fixed-point constants are: 
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Length Max 



2 63. i 

2 31 -1 
2* 5 -l 
27-1 



Min 
-2 63 
-2 31 
- 2 i s 
-2 7 



A field of three full-words is generated 
from the statement shown below. The loca- 
tion attribute of CONWRD is the address of 
the leftmost byte of the first word, and 
the length attribute is four, the implied 
length for a full-word fixed-point con- 
stant. The expression CONWRD+4 could be 
used to address the second constant (second 
word) in the field. 



r t r 1 

| Name | Operation } Operand | 

| CONWRD JDC |3F* 658474* j 



The next statement causes the generation 
of a two-byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant- 



j Name | Operation j Operand 

IHALFCON )DC |HS6 , -25.46* | 



The next constant (3.50) is multiplied 
by 10 to the -2 before being converted to 
its binary format. The scale modifier 
reserves twelve bits for the fractional 
portion. 




i t t 1 

| Name (Operation (Operand | 

IFULLCON | DC | HS12* 3. 50E-2* | 



The same constant could be specified as 
a literal : 



(Name (Operation | Operand 

| | AH |7,=HSl2'3.50E-2' J 



— i 
I 
— I 



The final example specifies three con- 
stants. Notice that the scale modifier 
requests four bits for the fractional por- 
tion of each constant. The four bits are 



provided whether or not the fraction 
exists. 



JName (Operation j Operand | 

|THREECON | DC ( FS4 • 10, 25. 3,100* ( 



Floating-Point Constants — E and D: A 
floating-point constant is written as a 
decimal number, which may be followed by a 
decimal exponent, if desired- The number 
may be an integer, a fraction, or a mixed 
number (i.e., one with integral and frac- 
tional portions). The format of the con- 
stant is as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be omit- 
ted, in which case, the number is 
assumed to be an integer. A positive 
sign is assumed if an unsigned number 
is specified. 

2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci- 
fying the exponent of the factor 10. 
The exponent may exceed the permissi- 
ble range for exponents, provided that 
the sum of the exponent and the expo- 
nent modifier does not exceed that 
range. If an unsigned exponent is 
specified, a plus sign is assumed. 

Machine format for a floating-point 
number is in two parts: the portion con- 
taining the exponent, which is sometimes 
called the characteristic, followed by the 
portion containing the fraction, which is 
sometimes called the mantissa. Therefore, 
the number specified as a floating-point 
constant must be converted to a fraction 
before it can be translated into the proper 
format. For example, the constant 27.3 5E2 
represents the number 27.35 times 10 to the 
2nd. Represented as a fraction, it would 
be .2735 times 10 to the 4th, the exponent 
having been modified to reflect the shift- 
ing of the decimal point. The exponent may 
also be affected by the presence of an 
exponent modifier, as explained under Oper- 
and Subfield 3: Modifiers . 

The exponent is then translated into its 
binary equivalent, and the fraction is 
converted to a binary number. Scaling is 
performed if specified; if not, the frac- 
tion is normalized (leading hexadecimal 
zeros are removed) . Rounding of the frac- 
tion is then performed according to the 
specified or implied length, and the number 
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is assembled into the proper field. Within 
the portion of the floating-point field 
allocated to the fraction, the hexadecimal 
point is assumed to be to the left of the 
leftmost hexadecimal digit, and the frac- 
tion occupies the leftmost portion of the 
field. Negative fractions are carried in 
true representation, not in the 2*s comple- 
ment form. The resulting number will not 
differ from the exact value by more than 
one in the last place. 

An implied length of four bytes is 
assumed for a full-word (E) and eight bytes 
is assumed for a double-word (D). The 
constant is aligned at the proper word or 
double word boundary if a length is not 
specified. However, any length up to and 
including eight bytes may be specified for 
either type of constant by a length modifi- 
er, in which case no boundary alignment 
occurs. 

Any of the following statements could be 
used to specify 46.415 as a positive, full- 
word, floating-point constant; the last is 
a machine-instruction statement with a 
literal operand. Note that the last two . 
constants contain an exponent modifier. 



constant is an integer, a fraction, or a 
mixed number is not pertinent to its 
generation. Furthermore, the decimal point 
is not assembled into the constant. The 
programmer may determine proper decimal 
point alignment either by defining his data 
so that the point is aligned or by select- 
ing machine-instructions that will operate 
on the data properly (i.e., shift it for 
purposes of alignment) . 



If zoned decimal format is specified 
(Z) , each decimal digit is translated into 
one byte. The translation is done accord- 
ing to the character set shown in Appendix 
A. The rightmost byte contains the sign as 
well as the rightmost digit. For packed 
decimal format (P) , each pair of decimal 
digits is translated into one byte. The 
rightmost digit and the sign are translated 
into the rightmost byte. The bit configu- 
ration for the digits is identical to the 
configurations for the hexadecimal digits 
0-9 as shown in Section 3 under 
"Hexadecimal Self-Defining Value. " For 
both packed and zoned decimals, a plus sign 
is translated into the hexadecimal digit C, 
and a minus sign into the digit D. 



| Name | Operation 
i j 


| Operand 


1 
_ , 1 


1 1 
1 IDC 
1 IDC 
1 1 DC 
1 IDC 
j j DC 
1 |AE 


|E* 46.415* 
|E* 46415E-3* 
|E* +464.15E-1* 
|E*+.46415E+2* 
|EE2*. 46415* 
|6,=EE2*. 46415* 


1 



The following would each be generated as 
double-word floating-point constants. 



j Name j operation | operand 



FLOAT. I DC 



|DE+4*+46,-3.729,+473« | 

J 



Decimal Constants — P and Z: A decimal 
constant is written as a signed or unsigned 
decimal value. If the sign is omitted, a 
plus sign is v assumed. The decimal point 
may be written wherever desired or may be 
omitted. Scaling and exponent modifiers 
may not be specified for decimal constants. 
The maximum length of a decimal constant is 
16 bytes. No word boundary alignment is 
performed. 

The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way, because, unlike 
fixed- point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that a decimal 



If an even number of packed decimal 
digits is specified, one digit will be left 
unpaired, because the rightmost digit is 
paired with the sign. Therefore, in the 
leftmost byte, the leftmost four bits will 
be set to zeros and the rightmost four bits 
will contain the odd (first) digit. 



If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies 
(taking into account the format, sign, and 
possible addition of zero bits for packed 
decimals) . If a length modifier is given, 
the constant is handled as follows: 



1. If the constant requires fewer bytes 
than the length specifies, the neces- 
sary number of bytes is added to the 
left. For zoned decimal format, the 
decimal digit zero is placed in each 
added byte. For packed decimals, the 
bits of each added byte are set to 
zero. 

2. If the constant requires more bytes 
than the length specifies, the neces- 
sary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 



Examples of decimal constant definitions 
follow. 
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Name 



t~ 






| Operation | Operand 

|DC |P'+1.25' 

|dc \t,*-5H3' 

)dc iz^^es' 

|DC |PL3 , 79.68» 






The following statement specifies three 
packed decimal constants. The length modi- 
fier applies to each packed decimal con- 
stant - 



| Name | Operation j Operand | 

|DECIMALS|DC |PL8 f + 25. 8, -387U,+2.3* | 



The last example illustrates the use of 
a packed decimal literal. 



JName j Operation | Operand j 

| |UNPK |OUTAREA,=PL2 f +25' | 



ADDRESS CONSTANTS: An address constant is 
a storage address that is translated into a 
constant. Address constants can be 
used for initializing base registers to 
facilitate the addressing of storage. 
Furthermore, they provide the means of 
communicating between control sections of a 
multisection program. However, storage 
addressing and control section communi- 
cation are also dependent on the use of the 
USING assembler instruction and the loading 
of registers, coding examples that illus- 
trate these considerations are provided in 
Section 3 under "Programming with the Using 
Instruction." 

An address constant, unlike other types 
of constants, is enclosed in parentheses. 
If two or more address constants are speci- 
fied in a statement, they are separated by 
commas, and the entire sequence is enclosed 
by parentheses. There are four types of 
address constants: A, Y, S, and V. 

Complex Relocatable Expressions: A complex 
relocatable expression can only be used in 
an A-type or Y-type address constant. 
These expressions contain two or more 
unpaired relocatable terms and/or a nega- 
tive relocatable term in addition to any 
absolute or paired relocatable terms that 
may be present. In contrast to relocatable 
expressions, complex relocatable expres- 
sions may represent negative values. A 



complex relocatable expression might con- 
sist of external symbols (which cannot be 
paired) and designate an address in an 
independent assembly that is to be linked 
and loaded with the assembly containing the 
address constant. 

The value of the expression is deter- 
mined when the referenced control sections 
are loaded. Complex relocatable expres- 
sions can be used to determine the distance 
between two control sections after they are 
loaded into main storage. 

A-Type Address Constant: This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression- (Remember 
that an expression may be single term or 
multiterm.) The value of the expression is 
calculated to 32 bits as explained in Sec- 
tion 2, with one exception: the maximum 
value of the expression may be 2 31 - 1. The 
value is then truncated on the left, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of an A-type constant is four bytes 
and alignment is to a full-word boundary 
unless a length is specified, in which case 
no alignment will occur. The length that 
may be specified depends on the type of 
expression used for the constant; a length 
of 1-4 bytes (.1 (1 bit) to 4 bytes for 
DOS F) may be used for an absolute expres- 
sion, while a length of 3 or 4 bytes may be 
used for a relocatable or complex relocat- 
able expression. 

In the following examples, the field 
generated from the statement named ACON 
contains four constants, each of which 
occupies four bytes. Note that there is a 
Location Counter reference in one. The 
value of the Location Counter will be the 
address of the first byte allocated to the 
fourth constant. The second statement 
shows the same set of constants specified 
as literals (i.e., address constant 
literals) . 



« 1 r 

! N ame \ °? er " 



H- 



ation 



Operand 



|ACON | DC 

LM 
t 1 



A(108,LOP,END-STRT,*+4096) | 
4,7,=A(108,LOP,END-STRT,*+409 6) 



Note : When the Location Counter ref- 
erence occurs in a literal, as in the LM 
instruction above, the value of the Loca- 
tion Counter is the address of the first 
byte of the instruction. 

Y-type Address Constant: A Y-type address 
constant has much in common with the A-type 
constant. It, too, is specified as an 
absolute, relocatable, or complex relocata- 
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ble expression. The value of the expres- 
sion is also calculated to 32 bits as 
explained in Section 2. However, the maxi- 
mum value of the expression may be only 
2 iS -l. The value is then truncated, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of a Y-type constant is two bytes 
and alignment is to a half-word boundary 
unless a length is specified, in which case 
no alignment occurs. The maximum length of 
a Y-type address constant is two bytes. If 
length specification is used, a length of 
two bytes may be designated for a relocata- 
ble or complex expression and 1 or 2 bytes 
(.1 (1 bit) to 2 bytes for DOS F) for an 
absolute expression. 



Warning; Specification of relocatable 
Y-type address constants should be avoided 
in programs destined to be executed on 
machines having more than 32,767 bytes of 
storage capacity. 



S-Type Address Constant; The S-type 
address constant is used to store an 
address in base- displacement form. 

The constant may be specified in two 
ways; 

1. As an absolute or relocatable expres- 
sion, e.g., S(BETA). 

2. As two absolute expressions, the first 
of which represents the displacement 
value and the second, the base reg- 
ister, e.g., S (400 (13)). 

The address value represented by the 
expression in (1) will be broken down by 
the assembler into the proper base register 
and displacement value. An S-type constant 
is assembled as a half word and aligned on 
a half-word boundary. The leftmost four 
bits of the assembled constant represents 
the base register designation, the remain- 
ing 12 bits the displacement value. 

If length specification is used, only 
two bytes may be specified. S-type address 
constants may not be specified as literals. 

V-Type Address Constant; This constant is 
used to reserve storage for the address of 
an external symbol that is used for effect- 
ing branches to other programs. The con- 
stant may not be used for external data 
references. The constant is specified as 
one relocatable symbol, which need not be 
identified by an EXTRN statement. Whatever 
symbol is used is assumed to be an external 
symbol by virtue of the fact that it is 
supplied in a V-type address constant. To 
suppress the AUTOLINK function of the 
linkage editor for a constant identified in 



a V-type address constant, the programmer 
can identify it in a WXTRN statement (DOS 
Assembler 14K D only) . 

Note that specifying a symbol as the 
operand of a V-type constant does not con- 
stitute a definition of the symbol for this 
assembly. The implied length of a V-type 
address constant is four bytes, and bound- 
ary alignment is to a full word. A length 
modifier may be used to specify a length of 
either three or four bytes, in which case 
no such boundary alignment occurs. In the 
following example, 12 bytes will be res- 
erved, because there are three symbols. 
The value of each assembled constant will 
be zero until the program is loaded. 



JName j Operation | Operand | 

IVCONST |DC | V (SORT, MERGE, CALC) | 

I J X J 



DS — DEFINE STORAGE 



The DS instruction is used to reserve areas 
of storage and to assign names to those 
areas. The use of this instruction is the 
preferred way of symbolically defining 
storage for work areas, input/output areas, 
etc. The typical form of the DS statement 
is: 



( T 

I Name I Operation 
( J 



Operand 



1 x ! 



j Any | DS i One operand (D assem- 
| symbol I I bier) or one or more 

I or not' I operands (F assembler)} 

used ! ! in the format de- 

scribed below, each 

separated by a comma. 
I x !____ 1 I 

The format of the DS operand is identi- 
cal to that of the DC operand; exactly the 
same subfields are employed and are written 
in exactly the same sequence as they are in 
the DC operand. Although the formats are 
identical, there are two differences in the 
specification of subfields. They are: 

1. The specification of data (subf ield 4) 
is optional in a DS operand, but it is 
mandatory in a DC operand. If a con- 
stant is specified, it must be valid. 

2. The maximum length that may be speci- 
fied for character (C) and hexadecimal 
(X) field types is 65,535 bytes rather 
than 256 bytes. 

If a DS operand specifies a constant in 
subf ield 4, and no length is specified in 
subf ield 3, the assembler determines the 
length of the data and reserves the 
appropriate amount of storage. It does not 
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assemble the constant . The ability to 
specify data and have the assembler calcu- 
late the storage area that would be 
required for such data is a convenience to 
the programmer, if he knows the general 
format of the data that will be placed in 
the storage area during program execution, 
all he needs to do is show it as the fourth 
subfield in a DS operand. The assembler 
then determines the correct amount of stor- 
age to be reserved, thus relieving the 
programmer of length considerations. 



To define four 10-byte fields and one 
100-byte field, the respective DS state- 
ments might be as follows: 



r t t 1 

| Name | Operation | Operand | 

j. + + 1 

j FIELD |DS I 4CL10 I 

I AREA |DS |CL100 | 

L J. X J 



s~ 



If the DS instruction is named by a 
symbol, its value attribute is the location 
of the leftmost byte of the reserved area. 
The length attribute of the symbol is det- 
ermined in the same manner as for a DC. 
Any positioning required for aligning the 
storage area to the proper type of boundary 
is done before the address value is deter- 
mined. Bytes skipped for alignment are not 
set to zero. 

Each field type (e.g., hexadecimal, 
character, floating-point) is associated 
with certain characteristics (these are 
summarized in Appendix F). The associated 
characteristics will determine which field- 
type code the programmer selects for the DS 
operand and what other information he adds, 
notably a length specification or a 
duplication factor. For example, the E 
floating-point field and the F fixed- point 
field both have an implied length of four 
bytes. The leftmost byte is aligned to a 
full-word boundary. Thus,' either code 
could be specified if it were desired to 
reserve four bytes of storage aligned to a 
full-word boundary. To obtain a length of 
eight bytes, one could specify either the E 
or F field type with a length modifier of 
eight- However, a duplication factor would 
have to be used to reserve a larger area, 
because the maximum length specification 
for either type is eight bytes. Note also 
that specifying length would cancel any 
special boundary alignment. 

In contrast, packed and zoned decimal (P 
and z) , character (C) , hexadecimal (X), and 
binary (B) fields have an implied length of 
one byte. Any of these codes, if used, 
would have to be accompanied by a length 
modifier, unless just one byte is to be 
reserved. Although no alignment occurs, 
the use of C and X field types permits 
greater latitude in length specifications, 
the maximum for either type being 65, 535 
bytes. (Note that this differs from the 
maximum for these types in a DC instruc- 
tion.) Unless a field of one byte is 
desired, either the length must be speci- 
fied for the C, X, P, Z, or B field types, 
or else the data must be specified (as the 
fourth subfield), so that the assembler can 
calculate the length. 



Although FIELD might have been specified 
as one 40-byte field, the preceding defini- 
tion has the advantage of providing FIELD 
with a length attribute of 10. This would 
be pertinent when using FIELD as a SS 
machine-instruction operand. 



Additional examples of DS statements are 
shown below: 



j Name j Operation j Operand | 

ONE |DS |CL80(one 80-byte field, 

j | length attribute of 80 

TWO |DS |80C(80 one-byte fields, 

| | length attribute of one 

THREE | DS |6F(six full words, length 

j | attribute of four) 

FOUR |DS |D(one double word, length 

j | attribute of eight) 

FIVE |DS |4H(f our half-words, 

j | length attribute of 

j | two) 

Note : A DS statement causes the storage 
area to be reserved but not set to zeros. 
No assumption should be made as to the 
contents of the reserved area. 



Special Uses of the Duplication Factor 



FORCING ALIGNMENT: The Location Counter 
can be forced to a double-word, full-word, 
or half-word boundary by using the 
appropriate field type (e.g., D, F, or H) 
with a duplication factor of zero. This 
method may be used to obtain boundary 
alignment that otherwise would not be pro- 
vided. For example, the following state- 
ments would set the Location Counter to the 
next double-word boundary and then reserve 
storage space for a 12 8-byte field (whose 
leftmost byte would be on a double-word 
boundary) . 
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I T T 

| Name (Operation | Operand 

I |DS |0D 

I AREA |DS |CL128 






DEFINING FIELDS OF AN AREA; A DS instruc- 
tion with a duplication factor of zero can 
be used to assign a name to an area of 
storage without actually reserving the 
area. Additional DS and/or DC instructions 
may then be used to reserve the area and 
assign names to fields within the area (and 
generate constants if DC is used) . 



For example, assume that 80- character 
records are to be read into an area for 
processing and that each record has the 
following format: 



Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 



Payroll Number 

Employee Name 

Date 

Gross Wages 

Withholding Tax 



The following example illustrates how DS 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate the storage for 
them- Note that the first statement names 
the entire area by defining the symbol 
RDAREA; the statement gives RDAREA a length 
attribute of 8 bytes, but does not reserve 
any storage. Similarly, the fifth state- 
ment names a 6-byte area by defining the 
symbol DATE; the three subsequent state- 
ments actually define the fields of DATE 
and allocate storage for them. The second, 
ninth, and last statements are used for 
spacing purposes and, therefore, are not 
named. 



CCW — DEFINE CHANNEL COMMAND WORD 



The CCW instruction provides a convenient 
way to define and generate an eight-byte 
Channel Command Word aligned at a double- 
word boundar y. The internal machine format 
of a Channel Command Word is shown in Table 
5-1. CCW will cause a ny bytes skipped to 
be zeroed . The typical form of the CCW 
instruction statement is: 



r 



Name 



{Any 

I symbol or 
not used 



CCW 



| Operat ion | Operand 

+ + 

| Four operands , 
| separated by commas, 
| specifying the con- 
sents of the channel 
| command word in 
| the format 
| described in the 
j following text 



-1 






All four operands must appear. They are 
written, from left to right, as follows: 



1. 



2. 



4. 



An absolute expression that specifies 
the command code. This expression's 
value is right- justified in byte 1. 
An expression specifying the data 
address. The value of this expression 
is in bytes 2-4. 

An absolute expression that specifies 
the flags for bits 32-36 and zeros for 
bits 37-39. The value of this expres- 
sion is right- justified in byte 5. 
(Byte 6 is set to zero. ) 
An absolute expression that specifies 
the count. The value of this expres- 
sion is right- justified in bytes 7-8. 



The following is an example of a CCW 
statement: 



~~x 



v_ 



| Name 

j. 

JRDAREA 


j Operation 
|DS 


| Operand 
|0CL80 




|DS 


|CL4 


| PAYNO 


|DS 


|CL6 


|NAME 


IDS 


|CL20 


|DATE 


|DS 


|0CL6 


|DAY 


|DS 


|CL2 


| MONTH 


|DS 


|CL2 


|YEAR 


|DS 


|CL2 




|DS 


|CL10 


| GROSS 


|DS 


|CL8 


|FEDTAX 


|DS 


|CL8 




|DS 


|CL18 






| Name j Operation (Operand | 

| | | CCW | 2,READAREA, X* 48 » ,80 | 






Note that the form of the third operand 
sets bits 37-39 to zero, as required. The 
bit pattern of this operand is as follows: 



32-35 
0100 



36-39 
1000 



If there is a symbol in the name entry 
of the CCW instruction, it is assigned the 
address value of the leftmost byte of the 
channel command word. The length attribute 
of the symbol is eight. 
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Table 5-1. 



Channel Command Word 



I r 



! Byte 

L_ 


i Bits i Usage 

L _ J. 


1 1 


! 0-7 


Command code 


i 2-4 


! 8-31 


Data address 


! 5 


! 32-36 
i 37-39 


Flags 

Must be zero 


i 6 


j 40-47 


Set to zero 


! 7-8 


! 48-63 


Count 



LISTING CONTROL INSTRUCTIONS 

The listing control instructions are used 
to identify an assembly listing and assem- 
bly output cards, to provide blank lines in 
an assembly listing, and to designate how 
much detail is to be included in an assem- 
bly listing. In no case are instructions 
or constants generated in the object pro- 
gram. Listing control statements except 
PRINT are not printed, unless the state- 
ment is continued. Then the first card of 
the statement will be printed. 

TITLE — IDENTIFY ASSEMBLY OUTPUT 

The TITLE instruction enables the program- 
mer to identify the assembly listing and 
assembly output cards. The typical form of 
the TITLE instruction statement is as fol- 
lows : 



i Name 

i _ _ J 


Operation 


i 


Operand 


I i 

j A special i 


TITLE 




One to 100 


1 symbol, a i 






characters, 


| sequence J 






enclosed in 


symbol, a ■ 






single 


t variable i 






apostrophes 


J symbol, or [ 








not used i 









The name entry may contain a special 
symbol which is one to four alphabetic or 
numeric characters in any combination. The 
contents of the name entry are then punch- 
ed into columns 73-76 of all the output 
cards for the program except those pro- 
duced by the PUNCH and REPRO assembler 
instructions. Only the first TITLE state- 
ment in a program may have a special symbol 
or variable symbol in the name entry. The 
name field of all subsequent TITLE state- 
ments must be blank or contain a sequence 
symbol. 

The operand field may contain up to 100, 
characters enclosed in apostrophes. Any 
ampersands or apostrophes enclosed within 
the surrounding apostrophes must be rep- 
resented by two ampersands or apostrophes. 

The double ampersands and apostrophes 
punched into a TITLE card appear as single 
ampersands and apostrophes in a TITLE state- 



ment of an assembler listing. A single 
apostrophe between the enclosing apostrophes 
simply terminates the operand field. A 
single ampersand initiates an attempt to 
identify a variable symbol. If the variable 
symbol is not identifiable the statement is 
flagged as an error. 

However, it is the number of printed 
characters that are counted in the total 
number of operand characters . The contents 
of the name and operand field are printed 
at the top of each page of the assembly 
listing. 

A program may contain more than one 
TITLE statement. Each TITLE statement pro- 
vides the heading for pages in the assembly 
listing that follow it, until another TITLE 
statement is encountered. Each TITLE 
statement encountered after the first one 
causes the listing to be advanced to a new 
page (before the heading is printed) . 

For example, if the following state- 
ment is the first TITLE statement to appear 
in a program: 



j _ _ _ 

Name i Operation i Operand 



r . 

PGM1 ' 



TITLE 



' 'FIRST HEADING 1 ' 



then, PGM1 is punched into all the output 
cards (columns 73-76) and this heading 
appears at the top of each page: FIRST 
HEADING . 

If the following statement occurs later 
in the same program: 



Name 



Operation 



Operand 



TITLE 



'A NEW HEADING 1 i 
J 



then, PGM1 is still punched into the output 
cards , but each following page begins with 
the heading: A NEW HEADING. 

Note: The sequence number of the cards 
in the output deck is contained in columns 
77-80, except those produced by the PUNCH 
and REPRO assembler instructions. 



EJECT — START NEW PAGE 



The EJECT instruction causes the next line 
of the listing to appear at the top of a 
new page. This instruction provides a 
convenient way to separate routines in the 
program listing. The typical form of the 
EJECT instruction statement is as follows: 
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r ~ 1 — "" ~i — ~ ~ ~i 

J Name • Operation J Operand j 


i_ _ _ p _ _ — j_ _ _ _ | 

i A j EJECT J Not used; should] 
[ sequence j [ be blank j 
i symbol or i i i 
i, not used J | | 



One to three of the following operands 
are used: 



r~ 



If the next line of the listing would 
appear at the top of a new page without the 
EJECT instruction, the EJECT instruction 
has no immediate effect. If one or more 
EJECT statements appear after the first 
EJECT, one or more pages are skipped. A 
TITLE instruction followed immediately by 
an EJECT instruction will result in a page 
with a title line and a statement heading 
line. Text following the EJECT instruction 
will begin at the top of the next page. 



ON 

or 
OFF 

GEN 

or 
NOGEN 



DATA 

or 
NODATA 



SPACE — SPACE LISTING 



A listing is printed. 

No listing is printed. 

All statements generated by 
macro instructions are printed, 

Statements generated by macro 
instructions are not printed, 
except MNOTE messages which 
print regardless of NOGEN. 
However, the outer macro 
instruction itself will appear 
in the listing. 

Constants are printed out in 
full in the listing. 

Only the leftmost eight bytes 
(16 hexadecimal digits) are 
printed. 



The SPACE instruction is used to insert one 
or more blank lines in the listing. The 
typical form of the SPACE instruction 
statement is as follows: 



A program may contain any number of 
PRINT statements. The conditions set by a 
PRINT statement are in effect until another 
PRINT statement is encountered. 



__ _ _ 

i Name J Operation j Operand 

i_ _ _j_ i _ _ 


i A i SPACE i A decimal value 
i sequence | i or not used 
[ symbol or j j 
i not used i i 



A decimal value is used to specify the 
number of blank lines to be inserted in the 
assembly listing. A blank operand causes 
one blank line to be inserted. If this 
value exceeds the number of lines remaining 
on the listing page, the statement will 
have the same effect as an EJECT statement. 



If an operand is omitted, it is assumed 
to be unchanged and continues according to 
its last specification. 

When OFF is specified, GEN and DATA have 
no effect. When NOGEN is specified, DATA 
has no effect for generated constants. 

If no PRINT statement is encountered, 
the following default option is assumed: 



i Name 



Operation i Operand 

I 

i 



PRINT 



ON, NODATA, GEN 



For example, if the statement: 



PRINT — PRINT OPTIONAL DATA 



The PRINT instruction controls the content 
of the assembly listing. The typical form 
of the PRINT instruction is: 



r i i " 

i Name | Operation i Operand 
L__ _l_ _ _ L__ _ 


J A i PRINT i One to three 
i sequence | i operands 
J symbol or j j 
j not used i i 



I 

Name J 



Operation [ Operand 



DC 



! XL256'00' 



appears in a program, 256 bytes of zeros 
are assembled. If the statement: 



i Name i Operation i Operand i 
J_ L _] 

I I PRINT I DATA ■ 

I L J J 
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is the last PRINT statement to appear 
before the DC statement, all 256 bytes of 
zeros are printed in the assembly listing. 
However, if there are no previous PRINT 
statements, or: 



JName j Operation | Operand 

) j PRINT | NODATA 
l 



1 
I 



; 



is the last PRINT statement to appear 
before the DC statement, only eight bytes 
of zeros are printed in the assembly list- 
ing. 

PROGRAM CONTROL INSTRUCTIONS 



The program control instructions are used 
to specify the end of an assembly, to set 
the Location Counter to a value or halfword 
boundary, to insert previously written 
coding in the program, to specify the 
placement of literals in storage, to check 
the sequence of input cards, to indicate 
statement format, and to punch a card. 
Except for the CNOP and COPY instructions, 
none of these assembler instructions gener- 
ate instructions or constants in the object 
program. 



of the source statement. The end column, 
when specified, must be from 41-80, inclu- 
sive; when not specified, it is assumed to 
be 71. The column after the end column is 
used to indicate whether the next card is a 
continuation card. Operand c specifies the 
continue column of the source statement. 
The continue column, when specified, must 
be from 2-40 and must be greater than b. 
If the continue column is not specified, or 
if column 80 is specified as the end 
column, the assembler assumes that there 
are no continuation cards, and all state- 
ments must be contained on a single card. 
The operand forms b,,c and b, are invalid. 

If no ICTL statement is used in the 
source program, the assembler assumes that 
1, 71, and 16 are the begin, end, and con- 
tinue columns, respectively. 

The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are rec- 
ognized because the continue column is not 
specified. 



JName j Operation | Operand | 

| | ICTL 1 25 | 



ICTL — INPUT FORMAT CONTROL 

The ICTL instruction allows the programmer 
to alter the format of the statements in 
his source module. It can only be used to 
control statements that are read from the 
system input file (SYSIPT) . It cannot be 
used to control the format of the input 
from the source statement library. State- 
ments that are brought in from that library 
(through macro instructions or COPY instruc- 
tions) are always assumed to be in the 
standard format. 

The ICTL statement must precede all 
other statements, and may only be used once. 
Its format is: 



| Name | Operation | Operand j 

| Not used, | ICTL | 1-3 decimal | 

| must not j | values of the j 

j be present j j form b f e,c j 



Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be from 1-40, inclu- 
sive. Operand e specifies the end column 



ISEQ — INPUT SEQUENCE CHECKING"' 



The ISEQ instruction is used to check the 
sequence of input cards. The typical form 
of the ISEQ instruction statement is as 
follows : 

r t r 1 

| Name | Operation | Operand | 

| Not used, | ISEQ j Two decimal j 

j must not j | values of the j 

j be present | | form l,r, or | 

j 1 | not used j 

The operands 1 and r, respectively, 
specify the leftmost and rightmost columns 
of the field in the input cards to be 
checked. Operand r must be equal to or 
greater than operand 1. Columns to be 
checked must not be between the "begin" and 
"end" columns. 

Sequence checking begins with the first 
card following the ISEQ statement, compar- 
ison of adjacent cards makes use of the 
eight- bit internal collating sequence. 
Each card checked must be higher than the 
preceding one. 



Assembler Instruction Statements 53 



An ISEQ statement with a blank operand 
terminates the operation- Checking may be 
resumed with another ISEQ statement. 



Sequence checking is only performed on 
statements contained in the source program. 
Statements inserted by the COPY 
assembler-instruction or generated by a 
macro- instruction are not checked for 
sequence. 



PUNCH — PUNCH A CARD 



REPRO — REPRODUCE FOLLOWING CARD 



The REPRO assembler-instruction causes data 
on the following statement line to be 
punched into a card. The data is not proc- 
essed; it is punched in a card and no sub- 
stitution is performed for variable sym- 
bols. No sequence number or identification 
is punched in the card. One REPRO instruc- 
tion produces one punched card. The REPRO 
instruction may not appear before a macro- 
definition. 

REPRO statements that occur before all 
statements composing the first or only 
control section will punch cards which 
precede all cards of the object deck. The 
form is: 



/"~^ 



The PUNCH assembler- instruction causes the 
data in the operand to be punched into a 
card. One PUNCH statement produces one 
punched card. As many PUNCH statements may 
be used as are necessary. The typical form 
is: 



Name 



| Operation 

4 

I PUNCH 



sequence | 
I symbol or j 
inot used j 



b 



Name | Operation J Operand 

A | REPRO | Not used, should 

sequence j j no t be present 



symbol orj 
[noJb_usedj 



f 




j Operand j 

|1 to 80 characters j 

| enclosed in j 

| apostrophes j 



The line to be reproduced may contain 
any combination of up to 80 characters. 
Characters may be entered starting in 
column 1 and continue through column 80 of 
the line- column 1 of the line corresponds 
to column 1 of the card to be punched. 



/"^. 



Using character representation, the 
operand is written as a string of up to 80 
characters enclosed in apostrophes . All 
characters, including blank, are valid. 
The position immediately to the right of 
the left apostrophe is regarded as column 
one of the card to be punched. The assem- 
bly program does not process the data in 
the operand of a PUNCH statement other than 
causing it to be punched in a card. For 
each apostrophe or ampersand desired in the 
operand, two apostrophes or ampersands must 
be written. The two apostrophes or amper- 
sands are reduced to a single apostrophe or 
ampersand. However, they count as only one 
character in. the operand. 

PUNCH statements may occur anywhere 
within a program, except before macro- 
definitions. They may occur within a 
macro- definition but not between a MEND 
statement and the beginning of the next 
macro. If a PUNCH statement occurs before 
the first control section, the resultant 
card will precede all other cards in the 
object program card deck; otherwise the 
card will be punched in place. No sequence 
number or identification is punched in the 
card. 



ORG — SET LOCATION COUNTER 



The ORG instruction is used to alter the 
setting of the Location Counter for the 
current control section. The typical form 
of the ORG instruction statement is: 



Name j Operation j Operand | 

A | ORG | A relocatable ex- j 

sequence | |pression or not used j 

symbol orj j | 

not used \ i I 



Any symbols in the expression must have 
been previously defined . The unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 
statement appears. 

The Location Counter is set to the value 
of the expression in the operand- If the 
operand is omitted, the Location Counter is 
set to a location that is one byte higher 
than the maximum location assigned for the 
control section up to this point. 
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An ORG statement must not be used to 
specify a location below the beginning of 
the control section in which it appears. 
The effect would be to give the location 
counter a large value. For example, the 
statement: 

f T T T 

I Name | Operation | Operand | 

| | ORG |*- 500 

l x .L_ , j 

is invalid if it appears less than 500 
bytes from the beginning of the current 
control section. 

If it is desired to reset the Location 
Counter to the next available location in 
the current control section, the following 
statement would be used: 



| Name | Operation | Operand 
j + + 

I I ORG | 



1 

I 

-H 

I 
j 



If previous ORG statements have reduced 
the Location Counter for the purpose of 
redefining a portion of the current control 
section, an ORG statement with an omitted 
operand can then be used to terminate the 
effects of such statements and restore the 
Location counter to its highest setting. 



The literal pool is organized into four 
segments within which the literals are 
stored in order of appearance, dependent on 
the divisibility properties of their object 
lengths (dup factor times total explicit 
or implied length) . The first segment 
contains all literals whose object length 
is a multiple of eight. Those remaining 
literals with lengths divisible by four 
are stored in the second segment. The 
third segment holds the remaining even- 
length literals. Any literals left over 
have odd lengths and are stored in the 
fourth segment. 

Since each literal pool begins at a 
double-word boundary, this guarantees that 
all segment one literals are double-word, 
segment two full-word, and segment three 
half-word aligned, with no space wasted 
except, possibly, at the pool origin. 

Literals from the following statement 
are in the pool, in the segments indicated 
by the circled numbers , 

MVC A (6) ,=3H'l' (3) 

AD 2,=D , 1' 

LM 3 f 5 f = 3F , l' (2) 

IC 2,=XL1'1' 

AD 2,=D'2' 



Special Addressing Consideration 



LTORG — BEGIN LITERAL POOL 



The LTORG instruction causes all literals 
since the previous LTORG or beginning of 
the program to be assembled at appropriate 
boundaries starting at the first double- 
word boundary following the LTORG 
statement. If no literals follow the LTORG 
statement, alignment of the next instruc- 
tion will occur. Bytes skipped are not 
zeroed. The typical form of the LTORG 
instruction statement is: 



Any literals used after the last LTORG 
statement in a program are placed at the 
end of the first control section. If there 
are no LTORG statements in a program, all 
literals used in the program are placed at 
the end of the first control section. In 
these circumstances the programmer must 
ensure that the first control section is 
always addressable. This means that the 
base address register for the first control 
section should not be changed through usage 
in subsequent control sections. If the 
programmer does not wish to reserve a reg- 
ister for this purpose, he may place a 
LTORG statement at the end of each control 
section, thereby ensuring that all literals 
appearing in that section are addressable. 



| Name 

| Any 
) symbol 
j or not 
[used 



| Operation | Operand 

| LTORG | Not used, should 
j j not be present 



.1 






J 



The symbol represents the address of the 
first byte of the literal pool. It has a 
length attribute of one. 



CNOP — CONDITIONAL NO OPERATION 



The CNOP instruction allows the programmer 
to align an instruction at a specific word 
boundary. If any bytes must be skipped in 
order to align the instruction properly, 
the assembler insures an unbroken instruc- 
tion flow by generating no-operation 
instructions. This facility is useful in 
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creating calling sequences consisting of a 
linkage to a subroutine followed by parame- 
ters such as channel command words (CCW). 

The CNOP instruction insures the align- 
ment of the Location Counter setting to a 
half-word, word, or double-word boundary. 
If the Location Counter is already properly 
aligned, the CNOP instruction has no 
effect. If the specified alignment 
requires the Location Counter to be incre- 
mented, one to three no-operation instruc- 
tions are generated, each of which uses two 
bytes. 

The typical form of the CNOP instruction 
statement is as follows: 



I t 

I Name | Operation 



sequence | 
symbol ori 



CNOP 



L 



not used 



1. 



— r 1 

| Operand | 

| Two absolute j 
(expressions of j 
| the form b,w j 

_t i 



Any symbols used in the expressions in 
the operand field must have been previously 
defined. 

Operand b specifies at which byte in a 
word or double word the Location Counter is 
to be set; b can be 0, 2, 4, or 6. Operand 
w specifies whether byte b is in a word 
(w=4) or double word (w=8). The following 
pairs of b and w are valid: 



Figure 5-5 shows the position in a dou- .<- 
ble word that each of these pairs specifies 
Note that both 0,4 and 2,4 specify two 
locations in a double word. 

Assume that the Location Counter is 
currently aligned at a double-word bounda- 
ry. Then the CNOP instruction in this 
sequence: 



(Name j Operation | Operand j 

| | CNOP | 0,8 | 

| JBALR | 2,14 | 

has no effect. However, this sequence: 

r t t 1 

(Name (Operation | Operand | 

( | CNOP | 6,8 j 

( |BALR | 2,14 | 

I J. X J 

causes three branch-on-conditions 
(no- operations) to be generated, thus 
aligning the BALR instruction at the last 
half-word in a double word as follows: 



JName j Operation | Operand 

I |BCR | 0,0 

I |BCR (0,0 

I |BCR | 0,0 

| | BALR | 2,14 



b, w 

0,4 
2,4 
0,8 
2,8 
4,8 

6,8 



Specifies 

Beginning of a word 
Middle of a word 
Beginning of a double word 
Second half word of a double word 
Middle (third half word) of a dou- 
ble word 
Fourth half word of a double word 



After the BALR instruction is generated, 
the Location Counter is at a double-word 
boundary, thereby insuring an unbroken 
instruction flow. 

Note : If the location counter is on an 
odd-numbered byte-boundary when a CNOP 
instruction is encountered, normal align- 
ment occurs before the CNOP is processed. 



| Double Word I 

1 Word | Word | 

j. n + T 1 

| Half word | Half word | Half word | Half word | 

| Byte | Byte 1 Byte | Byte | Byte | Byte j Byte | Byte J 

L X J L— X X J X : ^ 

I I 

|0,4 2,4 0,4 2,4 | 

|0,8 2,8 4,8 6,8 ] 

Figure 5-5. CNOP Alignment 
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COPY — COPY PREDEFINED SOURCE CODING 



END — END ASSEMBLY 



The COPY instruction obtains source- 
language coding from a system library and 
includes it in the program currently being 
assembled. Under the DOS D Assembler, 10K 
Variant, the coding to be included is ob- 
tained from the system source statement 
library. Under the DOS D Assembler, 14K 
Variant, and the DOS F Assembler, the coding 
to be included is obtained from the private 
source statement library, if one is assigned, 
or from the system source library, in that 
order of precedence. Under the TOS D Assem- 
bler, 10K and 14K Variants, the coding to 
be included is obtained from the standard 
private library. The form of the COPY in- 
struction statement is as follows: 



j Name | Operation j Operand | 

| Not used, j COPY j One symbol j 

j must not | j j 

| be present j j I 



The END instruction terminates the assembly 
of a program. It may also designate a 
point in the program or in a separately 
assembled program to which control may be 
transferred after the program is loaded. 
The END instruction must always be the last 
statement in the source program. 



The typical form of the END instruction 
statement is as follows: 



| Name | Operation j Operand | 
j A sequence | END j A relocatable j 



| symbol or | 
j not present | 



expression or 
not present 



The operand specifies the point to which 
control may be transferred when loading is 
complete. For example: 



The operand is a symbol that identifies 
the section of coding to be copied. The 
symbol must not be the same as the mnemonic 

N , operation code of a macro definition in 
J the source statement library. 

The assembler inserts the requested 
coding immediately after the COPY statement 
is encountered. The requested coding may 
not contain another COPY statement. 



If identical COPY statements are encoun- 
tered, the coding they request is brought 
into the program each time. 

COPYed text is always in the normal 
format and is not governed by ICTL usage. 
See Copy Statements in Section 7 for furth- 
er information. The procedure for placing 
source language coding in the system 
library is described in the system Control 
and system service programs publication 
listed in the Preface- 



|Name | Operation 

NAME | CSECT 
AREA JDS 
BEGIN j BALR 
I USING 



END 



| Operand 
■+ 






50F 
2,0 
*,2 



| BEGIN 
-JL 



NOTE: If macro instructions from the 
Source Statement Library are included 
in an assembly, errors detected during 
macro editing will be flagged after the 
END statement. The error messages do 
not follow the macro instructions, be- 
cause the source statements are not 
available to the assembler during macro 
editing. Errors detected while editing 
Programmer Macros will be flagged in- 
line. 
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PART 3 — CONDITIONAL ASSEMBLY AND MACRO FACILITIES IN THE ASSEMBLER LANGUAGE 



SECTION 6: INTRODUCTION TO THE CONDITIONAL 
ASSEMBLY AND MACRO FACILITIES 



The DOS/TOS conditional assembly and macro 
facilities are part of the DOS/TOS assem- 
bler language. 

Conditional assembly allows one to spec- 
ify assembler language statements which may 
or may not be assembled, depending upon 
conditions evaluated at assembly time. 
Conditional assembly statements are used to 
define, set, change, and test values during 
the course of the assembly itself. 

The conditional assembly instructions 
may be used to vary the sequence of state- 
ments generated for each occurrence of a 
macro instruction. Conditional assembly 
instructions may also be used outside 
macro definitions, i.e., among the assem- 
bler language statements in the program. 

The macro facilities provide the pro- 
grammer with a convenient way of generating 
desired sequences of machine or certain 
assembler instructions many times in one or 
more programs-. This is accomplished by 
writing a macro definition. 

This macro definition is written only 
once, and a single statement, a macro 
instruction statement, is written each time 
a programmer wants to generate the desired 
sequence of statements. 

The macro facilities simplify the coding 
of programs , reduce the chance of program- 
ming errors, and ensure that standard se- 
quences of statements are used to accomplish 
desired functions. 



THE MACRO INSTRUCTION STATEMENT 



A macro instruction statement (also called 
a macro instruction) is a source program 
statement used to provide information for 
generating machine and assembler instruc- 
tions from a macro definition. The gener- 
ated instructions are source statements 
which are then processed by the assembler 
program- 
Three types of macro instructions may be 
written. Each type has a different form of 
operand. They are: 



1. Positional ( Sections 7 and 8_) . 

2. Keyword ( Section 10 ) . 

3. Mixed-mode ( Section 10 ) . 

Positional macro instruction operands 
are written in a fixed order. 

Keyword macro instruction operands can 
be written in any order. 

Mixed- mode macro instruction operands 
are a combination of both positional and 
keyword operands. That is, certain operand 
entries (positional) must be written in a 
fixed order; other operand entries 
(keyword) can be specified in any order. 



THE MACRO DEFINITION 



Before a macro instruction can be assem- 
bled, a macro definition must be available 
to the assembler. 

A macro definition is a set of state- 
ments that provide the assembler with: 

1. The name entry, mnemonic operation 
code, and the form of the macro 
instruction operand, and 

2. The sequence of statements the 
assembler uses when the macro 
instruction appears in the source 
program. 

Every macro definition consists of a 
macro definition header statement, a macro 
instruction prototype statement, a sequence 
of model statements, COPY statements, 
MEXIT, MNOTE, or conditional assembly 
instructions, and a macro definition trail- 
er statement. 

The macro definition header and trailer 
statements denote the beginning and end, 
respectively, of a macro-definition. 

The macro instruction prototype state- 
ment specifies the name entry, mnemonic 
operation code, and the type of the macro 
instruction operand. 

The model statements contained in a 
macro definition may be used by the 
assembler to generate machine instructions 
and certain assembler instructions that 
replace each occurrence of the macro 
instruction. 
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The COPY statements may be used to copy 
model statements, MEXIT instructions, MNOTE 
instructions, and conditional assembly in- 
structions from a source statement library 
into a macro definition. 



The MEXIT instruction can be used to 
terminate processing of a macro definition. 

The MNOTE instruction can be used to 
generate a message. 

The conditional assembly instructions 
may be used to vary the sequence of 
statements generated for each occurrence of 
a macro instruction. Conditional assembly 
instructions may also be used outside 
macro definitions, i.e., among the assem- 
bler language statements in the program. 

If a macro definition is in-line with an 
assembly, it is called a programmer macro. 



SOURCE STATEMENT LIBRARIES 



The same macro definition may be made avail- 
able to more than one source program by 
placing the macro definition in the system 
source statement library. The macro 
definition then becomes a system macro. 
This system library is a collection of 
macro definitions that can be used by all 
the assembler language programs in an in- 
stallation. Once a macro definition has 
been placed on the system source statement 
library it may be used by writing a cor- 
responding macro instruction in a source 
program. Macro definitions must be in the 
system source statement library under the 
same name as the prototype. The procedure 
for placing macro definitions in the sys- 
tem source statement library is described 
in the System Control and System Service 
Programs publication listed in the Preface . 

System macro definitions provided by IBM 
are described in the Supervisor and Input/ 
Output Macros publication, also listed in 
the Preface . 

A macro definition may be made available 
to a specific assembly by placing the macro 
definition in a private source statement 
library. If the private source statement 
library is assigned at the time of assembly, 
the macro definitions in the private source 
statement library may be used by writing a 
corresponding macro instruction in a source 
program. The macro definitions in the pri- 
vate source statement library must be under 
the same name as the prototype. The pro- 
cedure for placing macro definitions in the 
private source statement library is des- 
cribed in the System Control and System 
Service Programs publication listed in the 
Preface. 



Editing errors in user-supplied macro 
definitions are found at the time the macro 
is read from the source statement library, 
i.e., after the END card. To determine 
where these errors are, it is necessary to 
punch all such macros, including inner 
macros, and insert them then in the source 
program as programmer macros. To aid in 
debugging it is advisable to run all macros 
as programmer macros before incorporating 
them in a source statement library. 



VARYING THE GENERATED STATEMENTS 



Each time a macro instruction appears in 
the source program, it is replaced by the 
same sequence of assembler language state- 
ments. Conditional assembly instructions, 
however, may be used to vary the number and 
format of the generated statements - 



VARIABLE SYMBOLS 

A variable symbol is a type of symbol that 
is assigned various values by either the 
programmer or the assembler. Thus, varia- 
ble symbols allow different values to be 
assigned to one symbol. When the assembler 
uses a macro definition to determine what 
statements are to replace a macro 
instruction, variable symbols in the model 
statements are replaced with the current 
values assigned to them. 

A variable symbol is written as an 
ampersand followed by from one to seven 
letters and/or digits, the first of which 
must be a letter. 



Types of Variable Symbols 



There are three types of variable symbols: 
symbolic parameters, system variable sym- 
bols, and SET symbols. The SET symbols are 
further broken down into SETA symbols, SETB 
symbols, and SETC symbols. The three types 
of variable symbols differ in how they are 
assigned values. 



Assigning Values to Variable Symbols 



Symbolic parameters are assigned values by 
the programmer each time he writes a macro 
instruction. 

System variable symbols are assigned 
values by the assembler each time it proc- 
esses a macro instruction. 
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SET symbols are assigned values by the 
programmer by means of conditional assembly 
instructions. 

Global SET Symbols 



The values assigned to SET symbols in one 
macro definition may be used in other 
macro definitions. All SET symbols used 
for this purpose must be defined as global 
SET symbols. All other SET symbols must be 
defined by the programmer as local SET 
symbols. Local SET symbols and the other 
variable symbols (that is, symbolic param- 
eters and system variable symbols) are 
lpdal variable symbols. Global SET symbols 
are global variable symbol s- 

ORGANIZATION OF THIS PART OF THE 
PUBLICATION 



Sections 7 and 8 describe the basic rules 



for preparing macro definitions and for 
writing macro instructions. 



Section 9 describes the rules for writ- 
ing conditional assembly instructions. 



Section 10 describes additional features 
including rules for defining global SET 
symbols, preparing keyword and mixed-mode 
macro definitions, and writing keyword and 
mixed-mode macro instructions. 

Appendix G contains a reference summary 
of the complete macro facilities. 

Examples of the use of the features of 
the language appear throughout the remain- 
der of the publication. These examples 
illustrate the use of particular features. 
However, they are not meant to show the 
full versatility of these features. 
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SECTION 7: HOW TO PREPARE MACRO DEFINITIONS 



A macro definition consists of: 



4. 



A macro definition header statement. 
A macro instruction prototype state- 
ment. 

Zero or more model statements, COPY 
statements, MEXIT, MNOTE, or condi- 
tional assembly instructions . 
A macro definition trailer statement, 



Except for MEXIT, MNOTE, and conditional 
assembly instructions, this section of the 
publication describes the statements that 
may be used to prepare macro definitions. 
Conditional assembly instructions are des- 
cribed in Section 9 . MEXIT and MNOTE 
instructions are described in Section 10 . 

Macro-definitions in a source program 
must appear before all PUNCH and REPRO 
statements which appear in the main pro- 
gram. Specifically, only the listing con- 
trol instructions (EJECT, PRINT, SPACE, and 
TITLE), ICTL and ISEQ instructions, and 
comments statements may occur before the 
macro definitions. All but the ICTL 
instruction may appear between macro 
definitions if there is more than one 
definition in the source program. 

Note : A macro definition cannot appear 
within a macro definition. 



MACRO — MACRO DEFINITION HEADER 

The macro definition header statement 
denotes the beginning of a macro 
definition. It must be the first statement 
in every macro definition. The form of 
this statement is: 



Name 



Not used, 
must no 
be present 



Operation j Operand 



MACRO i Not used, must 
■ not be present 



MEND — MACRO DEFINITION TRAILER 



The macro definition trailer statement 
denotes the end of a macro definition. It 
must be the last statement in every macro 
definition. The form of this statement is: 



i j 1 1 

| Name i Operation | Operand | 
i [ j j 

I A I MEND j Not used, must' 

i sequence i [ not be present' 

|. symbol or | i i 

i not used ' i j 

I I i i 



This statement also tells the assembler 
to terminate processing of a macro defini- 
tion. Processing can be terminated at some 
other point in a macro definition through 
the MEXIT instruction. 



MACRO INSTRUCTION PROTOTYPE 



The macro ins 
(also called 
specifies the 
tion code, an 
instructions 
definition, 
ment of every 
typical form 



truction prototype statement 
the prototype statement) 

name entry, mnemonic opera- 
d the form of all macro 
that refer to the macro 
It must be the second state- 
macro definition. The 
of this statement is: 





"I 


Name [ Operation] Operand 




— r t* — 
A symbolicj A symbol | Zero to 100 


(200 for ! 


parameter j jF assembler) 


symbolic' 


or not i i parameters, 


separated 


used j | by commas 





The symbolic parameters are used in the 
macro definition to represent the name 
entry and operands of the corresponding 
macro instruction. A description of sym- 
bolic parameters appears following Model 
Statements . 

The name entry of the prototype state- 
ment may be unused or it may contain a 
symbolic parameter. 

The symbol in the operation entry is the 
mnemonic operation code that must appear in 
all macro instructions that refer to this 
macro definition. The mnemonic operation 
code must not be the same as the mnemonic 
operation code of another macro definition 
in the source program or of a machine 
instruction or assembler instruction. 



The operand may contain zero to 100 (200 
for F assembler) symbolic parameters 
separated by commas. 
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The following is a prototype statement. 



, , r 

i Name J Operation J Operand 

L 1 +. 

I &NAME ! MOVE [&TO,&FROM 
I l J 



Alternate Statement Form 



The prototype statement may be written in a 
form different from that used for machine 
or assembler instructions. The normal form 
is described in Part 1 of this publication. 
The alternate form described here allows 
the programmer to write an operand on each 
line, and allows the interspersing of oper- 
ands and comments in the statement. 

In the alternate form, as in the normal 
form, the name and operation entries must 
appear on the first line of the statement, 
and at least one blank must follow the 
operation entry on that line. Both types 
of statement forms may be used in the same 
prototype statement. 

The rules for using the alternate state- 
ment form are: 



If an operand is followed by a comma 
and a blank, and the column after the 
end column contains a nonblank character, 
the operand entry may be continued 
on the next line starting in the 
continue column. More than one oper- 
and may appear on the same line. 
Comments may appear after the blank 
that indicated the end of an operand, 
up to and including the end column. 
If the next line starts after the 
continue column, the information 
entered on that line is considered to 
be comments, and the operand field is 
considered terminated. Any subsequent 
continuation lines are considered to 
contain only comments. 



Note ; A prototype statement may be 
written on as many continuation lines as is 
necessary to contain 100 (200 for F assem- 
bler) operands and associated comments. 

The following examples illustrate: (1) 
the normal statement form, (2) the alter- 
nate statement form, and (3) the combina- 
tion of both statement forms. 



i 1 l~ l" 1 

i Name i Oper- i Operand Comments i J 

! i ation | i 1 

I J. _L _ -1 ' 


1 NAME1 IOP1 l OPERANDI, OPERAND2 ,OPERAN 1 Xj 

J J |D3 THE NORMAL FORM \ i 
J _ i ^ _ _ ± ' 


! NAME2 IOP2 (OPERANDI, THIS IS THE AL 1 Xj 
| ! [OPERAND 2, OPE RAND 3, TERNA|xi 
l [ j TE STATEMENT { xj 
! 1 IFORM I J 


1 T ~ T ~ "i j 
I NAME3 JOP3 [OPERANDI, THIS IS A COMB j X, 
j I iOPERAND2,OPERAND3,OPERANlXj 
j j |D4, OPERANDS INATION OF ' Xi 
i | jBOTH STATEMENT FORMATS J ,' 



v_ 



MODEL STATEMENTS 



Model statements are the macro definition 
statements from which the desired sequences 
of machine instructions and certain assem- 
bler instructions are generated. Zero or 
more model statements may follow the proto- 
type statement. A model statement consists 
of one to four entries. They are, from 
left to right, the name, operation, oper- 
and, and comments entries. 

The name entry may be unused, or it may 
contain an ordinary symbol, a sequence 
symbol or a variable symbol, depending on 
the particular statement. (Neither * nor 
. * may be substituted in the begin column 
of a model statement.) 

The operation entry may contain any 
machine, assembler, or macro instruction 
mnemonic operation code, except COPY, END, 
ICTL, ISEQ, and PRINT; or it may contain a 
variable symbol. Variable symbols may not 
be used to generate the following mnemonic 
operation codes, nor may variable symbols 
be used in the name and operand entries of 
these instructions: COPY, END, ICTL, or 
ISEQ. Variable symbols may not be used to 
generate CSECT, DSECT , PRINT, REPRO, START, 
MACRO, MEND, MEXIT, LCLA, LCLB, LCLC , GBLA, 
GBLB, GBLC, SETA, SETB , SETC, AIF , AIFB, 
AGO, AGOB, ANOP, or macro instruction mne- 
monic operation codes. Variable symbols 
may not be used to generate the name and 
operation code of the ACTR instruction. 

Variable symbols may also be used out- 
side of macro definitions to generate mne- 
monic operation codes with the preceding 
restrictions . 

Although COPY statements may not be used 
as model statements, they may be part of a 
macro definition. The use of COPY state- 
ments is described under COPY Statements. 
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The operand entry may contain ordinary 
symbols or variable symbols. After sub- 
stitution, the operand must not be greater 
than 127 (255 for F assembler) characters. 
Model statement fields must follow the 
rules for paired apostrophes, ampersnads, 
and blanks, as macro-instruction operands. 
(See "Macro-Instruction Operands" in 
section 8.) Sequence symbols must appear 
in the operand entry of AGO and AIF in- 
structions. 

The comments entry may contain any 
combination of characters. Substitution by 
the use of variable symbols is not allowed. 

If a RE PRO statement is used as a model 
statement, it must be explicitly written in 
the operation entry. It may not be gener- 
ated as a result of replacing a variable 
symbol by its value. Also, the line fol- 
lowing it may not contain variable symbols. 
Substituted statements may not have blanks 
in any fields except between paired apos- 
trophes. They may not have leading blanks 
in the name or operand fields. 



SYMBOLIC PARAMETERS 



A symbolic parameter is a type of variable 
symbol consisting of an ampersand followed 
by one to seven letters and/or numbers, the 
first of which must be a letter. Symbolic 
parameters appear in prototype and model 
statements. They are assigned values by 
the programmer when he writes a macro- 
instruction. The programmer may vary 
statements that are generated for each 
occurrence of a macro- instruction by vary- 
ing the values assigned to symbolic param- 
eters. 



SIN AREA (contains a special charac- 
ter, i.e., blank, other 
than initial ampersand) 



The following is an example of a macro- 
definition. Note that the symbolic 
parameters in the model statements appear 
in the prototype statement. 



Header | 


| MACRO 


Prototype! SNAME 


|MOVE 


Model | &NAME 


|ST 


Model | 


|L 


Model | 


|ST 


Model | 


|L 


Trailer 1 


IMEND 



r t t 1 

| Name | Operation | Operand | 



| 6T0, 6FR0M 
| 2, SAVE 
|2,6FROM 
|2,ST0 
| 2, SAVE 



Symbolic parameters in model statements 
are replaced by the characters of the 
macro-instruction operand that correspond 
to the symbolic parameters. 

In the following example the characters 
HERE, FIELDA, and FIELDB of the MOVE macro- 
instruction correspond to the symbolic 
parameters &NAME, &T0, and &FROM, 
respectively, of the MOVE prototype state- 
ment. 



j Name j Operation | Operand | 

| HERE 1M0VE | FIELDA, FIELD B | 



The programmer should not use 6SYS as 
the first four characters of a symbolic 
parameter. 

The following are valid symbolic param- 
eters: 

£ READER &L00P2 
SA23456 SN 
6X4F2 6SU 

The following are invalid symbolic pa- 
rameters : 

CARD AREA (first character is not an 
ampersand) 

6256B (first character after 
ampersand is not a 
letter) 

6AREA2456 (more than seven characters 
after the ampersand) 

SBCDOt) (contains a special charac- 
ter other than initial 
ampersand) 



Any occurrence of the symbolic parame- 
ters &NAME, STO, and 6FR0M in a model 
statement will be replaced by the charac- 
ters HERE, FIELDA, and FIELDB, respective- 
ly. If the preceding macro-instruction was 
used in a source program, the following 
assembler language statements would be 
generated: 



r t t 

| Name | Operation | Operand 

| HERE | ST | 2, SAVE 

| JL | 2, FIELDB 

j JST | 2, FIELDA 

| |L j 2, SAVE 






The example below illustrates another 
use of the MOVE macro-instruction using 
different operands than those that appear 
in the preceding example. 
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JName (Operation j Operand | 
j. + + .] 

Macro | LABEL | MOVE | IN, OUT | 

Generated | LABEL | ST | 2, SAVE | 
Generated! |L |2,OUT | 
Generated! |ST |2,IN | 
Generated | |L | 2, SAVE j 
l j. j J 



If a symbolic parameter appears in the 
comments field of a model statement, it is 
not replaced by the corresponding charac- 
ters of the macro- instruction. 



Concatenating Symbolic Parameters with 
Other Characters or Other Symbolic 
Parameters 



Concatena tion is the process of linking or 
joining together in a sequence, with a 
specified order. To concatenate is to join 
together in a specified order. 

If a symbolic parameter in a model 
statement is immediately preceded or fol- 
lowed by other characters or another sym- 
bolic parameter, the characters that cor- 
respond to the symbolic parameter are com- 
bined, in the order given, in the generated 
statement, with the other characters or the 
characters that correspond to the other 
symbolic parameter. This process is called 
concatenation. 

The macro-definition, macro-instruction, 
and generated statements in the following 
example illustrate these rules. 



JName | Operation! Operand | 

I I MRfDn j 1 

I STY, 6P, STO, SFROM 
j 2 , SAVEAREA 



Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 

Macro 

Generated 
Generated 
Generated 
Generated 



I MACRO 
| 6 NAME j MOVE 
| S NAME | ST STY 
I I LSTY 
STSTY 
LSTY 



I 

j. 



l_ 



MEND 



JHERE |MOVE 

HERE |STD 

LD 

STD 

LD 

JL 



1.X , or , & XU| 

I <. , SAVEAREA 

|2,SPSFR0M 

|2,&PSTO 

j 2, SAVEAREA 

I 

| D, FIELD, A, B 

| 2, SAVEAREA 
|2,FIELDB 
j 2 , FIELDA 
j 2, SAVEAREA 

J. 



-I 

-I 



generated statements. The character D in 
the macro- instruct ion corresponds to sym- 
bolic parameter STY. Since STY is preceded 
by other characters (i.e., ST and L) in the 
model statements, the character that cor- 
responds to STY (i.e., D) is concatenated 
with the other characters to form the oper- 
ation fields of the generated statements. 



The symbolic parameters SP, STO, and 
SFROM are used in two of the model state- 
ments to vary part of the operand fields of 
the corresponding generated statements. 
The characters FIELD, A, and B correspond 
to the symbolic parameters SP, 5TO, and 
SFROM, respectively. Since SP is followed 
by SFROM in the second model statement, the 
characters that correspond to them (i.e., 
FIELD and B) are concatenated to form part 
of the operand field of the second generat- 
ed statement- Similarly, FIELD and A are 
concatenated to form part of the operand 
field of the third generated statement. 



If the programmer wishes to concatenate 
a symbolic parameter with a letter, digit, 
left parenthesis, or period following the 
symbolic parameter he must immediately 
follow the symbolic parameter with a per- 
iod. A period is optional if the symbolic 
parameter is to be concatenated with anoth- 
er symbolic parameter, or a special charac- 
ter other than a left parenthesis or anoth- 
er period that follows it. 

If a symbolic parameter is immediately 
followed by a period, then the symbolic 
parameter and the period are replaced by 
the characters that correspond to the sym- 
bolic parameter. A period that immediately 
follows a symbolic parameter does not 
appear in the generated statement. 

The following macro-definition, macro- 
instruction, and generated statements 
illustrate these rules. 



r t t 1 

| Name | Operation] Operand | 



The symbolic parameter STY is used in 
each of the four model statements to vary 
the mnemonic operation code of each of the 



Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 

Macro 

Generated 
Generated 
Generated 
Generated 



| MACRO 
SNAME|MOVE 
SNAME|ST 

|L 

j ST 

IL 

| MEND 

4 

I HERE | MOVE 

4 

I HERE j ST 

|L 

|ST 

|L 

L X 



JSP, SS,6R1,6R2 
|6R1,SS. (6R2) 
|SR1,6P.B 
|SR1,SP.A 
|SR1,SS. (SR2) 

I 
J. + + 



|. + _ + ^ 



| FIELD, SAVE, 2,1 

+- 

|2,SAVE(U) 

|2,FIELDB 

| 2, FIELDA 

j 2, SAVE U) 
J. J 



V 
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The symbolic parameter 6P is used in the 
second and third model statements to vary 
part of the operand field of each of the 
corresponding generated statements. The 
characters FIELD of the macro instruction 
correspond to 6P. Since SP is to be conca- 
tenated with a letter (i.e., B and A) in 
each of the statements, a period immediate- 
ly follows SP in each of the model state- 
ments- The period does not appear in the 
generated statements. 

Similarly, symbolic parameter 6S is used 
in the first and fourth model statements to 
vary the operand fields of the correspond- 
ing generated statements. SS is followed 
by a period in each of the model state- 
ments, because it is to be concatenated 
with a left parenthesis. The period does 
not appear in the generated statements. 



Comments Statements 



COPY STATEMENTS 



A COPY statement is not a model statement. 
COPY statements may be used to copy model 
statements and MEXIT, MNOTE, and condi- 
tional assembly instructions into a macro 
definition from a system library, just as 
they may be used outside macro definitions 
to copy source statements into an assembler 
language program. Under the DOS D Assembler, 
10K Variant, the coding to be included is 
obtained from the system source statement 
library. Under the DOS D Assembler, 14K 
Variant, and the DOS F Assembler, the coding 
to be included is obtained from the private 
source statement library, if one is assigned, 
or from the system source library, in that 
order of precedence. Under the TOS D Assem- 
bler, 10K and 14K Variants, the coding to 
be included is obtained from the standard 
private library. 



A model statement may be a comments state- 
ment. A comments statement consists of an 
asterisk in the begin column, followed by 
comments. The comments statement is used 
by the assembler to generate an assembler 
language comments statement, just as other 
model statements are used by the assembler 
to generate assembler language statements. 

The programmer may also write comments 
statements in a macro definition which are 
not to be generated. These statements must 
have a period in the begin column, immedi- 
ately followed by an asterisk and the com- 
ments. 



The form of this statement is : 



r t t 1 

| Name | Operation | Operand | 

| Not used, | COPY | A symbol | 
j must not J j J 

j be present j j | 

i j J J 



The first statement in the following 
example will be used by the assembler to 
generate a comments statement; the second 
statement will not. 



| Operation | operand 



JName 

j. 

j * THIS STATEMENT WILL BE GENERATED 
| . * THIS ONE WILL NOT BE GENERATED 



1 



The use of variable symbols for substi- 
tution in comments statements is not 
allowed. The * or .* of a comment state- 
ment, therefore, cannot be created by sub- 
stitution for a variable symbol. 



The symbol in the operand entry iden- 
tifies the section of coding to be copied. 
The symbol must not be the same as the 
operation mnemonic of a macro definition 
in a source statement library. Any 
statement that may be used in a macro 
definition may be part of the copied 
coding, except MACRO, MEND, COPY, and 
prototype statements. 

Statements COPYed into the program must 
obey the restrictions on ordering of state- 
ments. For example, COPY must be between 
global and local declarations in the macro 
definition or in the main program if the 
COPYed text contains global and local 
declarations. 
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SECTION 8: HOW TO WRITE MACRO INSTRUCTIONS 



The typical form of a macro instruction is: 



| Name j Operation 

| A symbol, (Mnemonic 

j sequence (Operation 

j symbol , or j code 

| not used j 

i x 



| operand | 

|Zero to 100 (200 | 

I for F assembler) j 

I operands, separ- | 

lated by commas j 



The name entry of the macro instruction 
may contain a symbol. The symbol will not 
be defined in the generation process unless 
a symbolic parameter appears in the name 
entry of the prototype and the same param- 
eter appears in the name entry of a gener- 
ated model statement. 

The operation entry contains the mnemon- 
ic operation code of the macro instruction. 
The mnemonic operation code must be the 
same as the mnemonic operation code of a 
macro definition in the source program or 
in a source statement library. 

The macro definition with the same mne- 
monic operation code is used by the assem- 
bler to process the macro instruction. 
Under the DOS D Assembler, 10K Variant, 
the macro definition is obtained from an 
inline programmer macro definition or from 
the system source statement library, in 
that order of precedence. Under the DOS D 
Assembler, 14K Variant, and the DOS F Assem- 
bler, the macro definition is obtained from 
an inline programmer macro definition, a 
private source statement library, if one is 
assigned, or the system source statement 
library, in that order of precedence. Under 
the TOS D Assembler, 10K and 14K Variants, 
the macro definition is obtained from an 
inline programmer macro definition or from 
the standard private library, in that order 
of precedence. 

The placement and order of the operands 
in the macro instruction may be determined 
by the placement and order of the symbolic 
parameters in the operand entry of the 
prototype statement. 

MACRO INSTRUCTION OPERANDS 



Paired Apostrophes: An operand may contain 
one or more sequences of characters, each 
of which is enclosed within single apos- 
trophes. (The sequence of characters 
itself may contain an even number of 
apostrophes). The single apostrophes, 
which enclose the sequence of characters, 
are called paired apostrophes. 

The first sequence of characters starts 
with the first apostrophe in the operand. 
Subsequent character sequences start with 
the first apostrophe after the apostrophe 
that ends the previous sequence of charac- 
ters. 

In the following example, there are two 
sequences of characters enclosed within 
single apostrophes. Therefore, there are 
two sets of paired apostrophes: the first 
and fourth apostrophes, and the fifth and 
sixth apostrophes. 

, A ,, B , C , D t 

An apostrophe (not within paired 
apostrophes) , immediately followed by a 
letter, and immediately preceded by the 
letter L (when L is preceded by any special 
character other than an ampersand) * is not 
considered in determining paired apostroph- 
es. For instance, the apostrophe in the 
following example is not considered. 

L* SYMBOL 
•AL' SYMBOL* is an invalid operand. 

Paired Parentheses: There must be an equal 
number of left and right parentheses. The 
nth left parenthesis must appear to the 
left of the nth right parenthesis. 

Paired parentheses are a left parenthe- 
sis and a following right parenthesis with- 
out any other parentheses intervening. If 
there is more than one pair, each addition- 
al pair is determined by removing any pairs 
already recognized and reapplying the above 
rule for paired parentheses. For instance, 
in the following example the first and 
fourth, the second and third, and the fifth 
and sixth parentheses are each paired pa- 
rentheses. 

(A(B)OD(E) 



Any combination of up to 127 (255 for assem- 
bler F) characters may be used as a macro 
instruction operand provided that the fol- 
lowing rules concerning apostrophes , 
parentheses, equal signs, ampersands, 
commas, and blanks are observed. 



A parenthesis that appears between 
paired apostrophes is not considered in 
determining paired parentheses. For 
instance, in the following example the 
middle parenthesis is not considered. 

(*)') 
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Equal Signs; An equal sign can only occur 
as the first character in an operand or 
between paired apostrophes or paired pa- 
rentheses- The following examples illus- 
trate these rules. 

=F'32 i 

«C=D* 

E(F=G) 



Ampersands : Except as noted under "Inner 
Macro Instructions," each sequence of con- 
secutive ampersands must be an even number 
of ampersands. The following example 
illustrates this rule. 

66123S&&6 



Commas ; A comma indicates the end of an 
operand, unless it is placed between paired 
apostrophes or paired parentheses. The 
following example illustrates this rule. 

(A,B)C , , t 

Blanks : Except as noted under Statement 
Form , a blank indicates the end of the 
operand entry, unless it is placed between 
paired apostrophes . The following example 
illustrates this rule. 

•A B C* 

The following are valid macro 
instruction operands: 



SYMBOL 
123 

x'issa 1 

L'NAME 
•TEN = 10 • 
'COMMA IS 



A+2 

(TO (8), FROM) 

0(2,3) 

=F , 4096» 

AB6&9 

•PARENTHESIS IS ) 

•APOSTROPHE IS'*' 



The following are invalid macro 
instruction operands: 



W'NAME 
5A)B 



(15 B) 



ONE' IS •!• 



(odd number of apostrophes ) 
(number of left parentheses 

does not equal number of 

right parentheses) 
(blank not placed between 

paired apostrophes ) 
(blank not placed between 

paired apostrophes ) 



STATEMENT FORM 



Macro instructions may be written using 
the same alternate form that can be used to 
write prototype statements. If this form 
is used, a blank does not always indicate 
the end of the operand entry. The 
alternate form is described in Section 7, 
under the subsection "Macro Instruction 
Prototype." 



OMITTED OPERANDS 



If an operand that appears in the prototype 
statement is omitted from the macro 
instruction, then the comma that would have 
separated it from the next operand must be 
present. If the last operand(s) is omitted 
from a macro instruction, then the comma (s) 
separating the last operand (s) from the 
next previous operand may be omitted. 

The following example shows a macro 
instruction preceded by its corresponding 
prototype statement. The macro instruction 
operands that correspond to the third and 
sixth operands of the prototype statement 
are omitted in this example. 

| Name (Operation | Operand j 

| | EXAMPLE | 6A, SB, &C,SD, SE,SF | 
| JEXAMPLE |17,*+U, , AREA, FIELD (6) | 



If the symbolic parameter that 
corresponds to an omitted operand is used 
in a model statement, a null character 
value (not a blank) replaces the symbolic 
parameter in the generated statement, i.e., 
in effect the symbolic parameter is 
removed. 

For example, the first statement below 
is a model statement that contains the 
symbolic parameter SC. If the operand that 
corresponds to SC was omitted from the 
macro instruction, the second statement 
below would be generated from the model 
statement. 

i t r n 

| Name | Operation | Operand J 

| |MVC ITHERE&C. 25, THIS | 
| JMVC |THERE25,THIS j 

l JL x J 



OPERAND SUBLISTS 



An operand of a macro instruction may be a 
sublist. 

Sublists provide the programmer with a 
convenient way to refer to: (1) a collec- 
tion of macro instruction operands as a 
single operand, or (2) a single operand in 
a collection of operands. 

A sublist consists of one or more oper- 
ands (suboperands) separated by commas and 
enclosed in paired parentheses. The entire 
sublist, including the parentheses, is 
considered to be one macro instruction 
operand. 



How to Write Macro Instructions 
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A suboperand is always treated as a 
character string. It is not possible to 
pass a suboperand containing a sublist to 
an inner macro instruction (a macro instruc- 
tion used as a model statement in a macro 
definition) . The inner macro would regard 
the operand as a character string during 
generation. 

Omitted suboperands are handled in the 
same way as omitted operands. If () 
appears as an operand, however, it is 
treated as a character string, not as a 
sublist with all suboperands omitted. 

If a macro instruction is written in the 
alternate statement format, each sublist 
operand may be written on a separate line; 
the macro instruction may be written on as 
many lines as there are operands, including 
sublist operands. 

The limit of 127 characters (255 for 
assembler F) applies to an entire sublist 
including sub-operands, parentheses, and 
commas within these parentheses. 

If SPl is a symbolic parameter in a 
prototype statement, and the corresponding 
operand of a macro- instruction is a sub- 
list, then 6Pl(n) may be used in a model 
statement to refer to the nth operand of 
the sublist, where n may be any arithmetic 
expression allowed in a SETA instruction. 
The SETA instruction is described in Sec- 
tion 9 . If SP1 is a symbolic parameter, 
and the corresponding operand of a macro ' 
instruction is a sublist, then SP1 refers 
to the entire sublist (including 
parentheses ) . 

If the sublist notation is used, but the 
operand is not a sublist, then &P1(1) refers 
to the operand and &P1(2) through &P1(100) 
(&P1(200) for assembler F) refer to null 
character value. If an operand has the 
form () , it is treated as a character 
string and not as a sublist. 

For example, consider the following 
macro definition, macro instruction, and 
generated statements. 



Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 

Macro 

Generated 

Generated 

Generated 

Generated 



| Name 



anents- 

| Operation J Operand 

| MACRO j 

|ADDNUM ' tM ™ FT>t?l 



J. 



|A 
|A 
|ST 
JMEND 



r -j 

|6NUM, gREG,SAREA 
|6REG,6NUM(1) 
|6REG,€NUM<2) 
|gREG, 6NUM(3) 
|6REG,6AREA 







The operand of the macro instruction 
that corresponds to symbolic parameter SNUM 
is a sublist- One of the operands in the 
sublist is referred to in the operand entry 
of three of the model statements. For 
example, SNUM(l) refers to the first oper- 
and in the sublist corresponding to symbol- 
ic parameter SNUM. The first operand of 
the sublist is A. Therefore, A replaces 
SNUM(l) to form part of the generated 
statement. 

Note: When referring to an operand in a 
sublist, the left parenthesis of the sub- 
list notation must immediately follow the 
last character of the symbolic parameter, 
e.g., SNUM(l). A period should not be 
placed between the left parenthesis and the 
last character of the symbolic parameter. 

A period may be used between these two 
characters only when the programmer wants 
to concatenate the left parenthesis with 
the characters that the symbolic parameter 
represents. The following example shows 
what would be generated if a period 
appeared between the left parenthesis and 
the last character of the symbolic parame- 
ter in the first model statement of the 
above example- 



|Name| Operation! Operand | ( 

Prototype I |ADDNUM |SNUM, 6REG, SAREA | 

Model j |L |SREG,SNUM. (1) j 

f + ., 1 

Macro j JADDNUM j j (A,B,C) , 6, SUM j 

Generated | |L |6, (A,B,C) (1) | 
i x J. J 



The symbolic parameter 6NUM is used in 
the operand entry of the model statement. 
The characters (A,B f C) of the macro 
instruction correspond to SNUM. Since SNUM 
is immediately followed by a period, SNUM 
and the period are replaced by (A, B,C). 
The period does not appear in the generated 
statement. The resulting generated 
statement is an invalid assembler language 
statement. 



INNER MACRO INSTRUCTIONS 



A macro instruction may be used as a model 
statement in a macro definition. Macro 
instructions used as model statements are 
called inner macro instructions. 

A macro instruction that is not used as 
a model statement is referred to as an 
outer macro instruction. 
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Any symbolic parameters used in an inner 
macro- instruction are replaced by the 
corresponding operands of the outer macro- 
instruction. 



The macro-definition corresponding to an 
inner macro-instruction is used to generate 
the statements that replace the inner 
macro- instruction. 



Note ; An ampersand that is part of a 
symbolic parameter is not considered in 
determining whether a macro-instruction 
operand contains an even number of 
consecutive ampersands. 



The ADDNUM macro- instruction of the 
previous example is used as an inner macro- 
instruction in the following example. 



The inner macro- instruction contains two 
symbolic parameters, 6S and ST- The 
characters (X,Y,Z) and J of the macro- 
instruction correspond to SS and ST, 
respectively. Therefore, these characters 
replace the symbolic parameters in the 
operand entry of the inner macro- 
instruction. 



The assembler then uses the macro- 
definition that corresponds to the inner 
macro- instruction to generate statements to 
replace the inner macro-instruction. The 
fourth through seventh generated statements 
have been generated for the inner macro- 
instruction. 



JName | Operat ion | Operand | 
Header | j MACRO | | 


Prototype! 


|COMP 


|SRl,SR2,SS,ST,SU j 


Model | 


|SR 


j SRI , SR2 j 


Model j 


|c 


| SRI, ST j 


Model j 


|BNE 


jsu | 

|6S,12,ST| | 
| SRI, ST | 


Inner j 


1 ADDNUM 


Model |SU 


|A 


Trailer j 


|MEND 
j MACRO 






1 ADDNUM 


1SNUM, S REG, S AREA 1 




|L 


JSREG, SNUM(l) | 




l& 


|6REG,SNUM(2) | 




U 


JSREG, SNUMO) | 




|ST 


j SREG, SAREA | 


Outer j K 

1- 

Generated | 


j MEND 

■~ 1 

JCOMP 

._-! 

|SR 


|10,11, (X,Y,Z),J,K| 
|10,11 | 


Generated j 


|c 


|10,J | 


Generated j 


|BNE 


|K j 
|12, X ] | 


Generated! 


|L 


Generated! 


|A 


112, Y | | 


Generated j 


|A 


|12,Z | | 


Generated | 


|ST 


112, J | I 

— -1 J 1 

110, J i 


Generated JK 


|A 


L 


1 


— — L — _— J 



LEVELS OF MACRO- INSTRUCTIONS 



A macro-definition that corresponds to an 
outer macro-instruction may contain any 
number of inner macro-instructions. The 
outer macro-instruction is called a first 
level macro-instruction. Each of the inner 
macro- instructions is called a second level 
macro-instruction. 



The macro-definition that corresponds to 
a second level macro-instruction may con- 
tain any number of inner macro- 
instructions. These macro-instructions are 
called third level macro-instructions, etc. 



The number of levels of macro- 
instructions that may be used depends upon 
the complexity of the macro-definition and 
the amount of storage available. This is 
described in detail in Appendix H. 



How to Write Macro-Instructions 
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SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 



The conditional assembly instructions allow 
the programmer to: (1) define and assign 
values to SET symbols that can be used to 
vary parts of generated statements, 1 and (2) 
vary the sequence of generated statements. 
Thus, the programmer can use these 
instructions to generate many different 
sequences of statements from the same 
macro- definition. 

There are 13 conditional assembly 
instructions, 10 of which are described in 
this section. The other three conditional 
assembly instructions — GBLA, GBLB, and 
GBLC — are described in Section 10. The 
instructions described in this section are: 



LCIA SETA AIF 
LCLB SETB AGO 
LCLC SETC ACTR 



ANOP 



The primary use of the conditional 
assembly instructions is in macro- 
definitions. However, all of them may be 
used in an assembler language source 
program. 

Where the use of an instruction outside 
macro- definitions differs from its use 
within macro-definitions, the difference is 
described in the subsequent text. 

The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to local SET symbols. 

The SETA, SETB, and SETC instructions 
may be used to assign arithmetic, binary, 
and character values, respectively, to SET 
symbols. The SETB instruction is described 
after the SETA and SETC instructions, 
because the operand of the SETB instruction 
is a combination of the operands of the 
SETA and SETC instructions. 



SET SYMBOLS 



SET symbols are one type of variable sym- 
bol. The symbolic parameters discussed in 
Section 7 are another type of variable 
symbol. SET symbols differ from symbolic 
parameters in three ways: (1) where they 
can be used in an assembler language source 
program, (2) how they are assigned values, 
and (3) how the values assigned to them can 
be changed. 

Symbolic parameters can only be used in 
macro-definitions, whereas SET symbols can 
be used inside and outside macro- 
definitions. 

SET symbols are assigned values by SETA, 
SETB, and SETC conditional assembly 
instructions and by local or global dec- 
larations. 

Each symbolic parameter is assigned a 
single value for one use of a macro- 
definition, whereas the values assigned to 
each SETA, SETB, and SETC symbol are not so 
restricted. 



Defining SET Symbols 



SET symbols must be defined by the 
programmer before they are used. When a 
SET symbol is defined it is assigned an 
initial value. SET symbols may be assigned 
new values by means of the SETA, SETB, and 
SETC instructions. A SET symbol is defined 
when it appears as an operand of an LCLA, 
LCLB, or LCLC instruction. 



The AIF, AGO, and ANOP instructions may 
be used in conjunction with sequence sym- 
bols to vary the sequence in which state- 
ments are assembled. The programmer can 
test attributes assigned by the assembler 
to symbols or macro- instruction operands to 
determine which statements are to be proc- 
essed. The ACTR instruction may be used to 
limit the number of AIF and AGO branches 
executed in any assembly. 

Examples illustrating the use of condi- 
tional assembly instructions are included 
throughout this section. A chart summariz- 
ing the elements that can be used in each 
instruction appears at the end of this 
section. 



Using Variable Symbols 



The SETA, SETB, and SETC instructions may 
be used to change the values assigned to 
SETA, SETB, and SETC symbols, respectively. 
When a SET symbol appears in the name or 
operand entry of a statement, the current 
value of the SET symbol (i.e., the last 
value assigned to it) replaces the SET 
symbol in the statement. When a SETC sym- 
bol appears in the operation entry of a 
statement, the current value of the SETC 
symbol replaces the SET symbol in the 
statement. 
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For example, if SA is a symbolic parame- 
ter, and the corresponding characters of 
the macro-instruction are the symbol HERE, 
then HERE replaces each occurrence of SA in 
the macro-definition. However, if SA is a 
SET symbol, the value assigned to 6 A can be 
changed, and a different value can replace 
various occurrences of SA in the macro- 
definition. 



processing the definition. If a SET symbol 
is used in the operand entry of a macro- 
instruction, and the value assigned to the 
SET symbol is in the form of sub list 
notation, the operand is not considered a 
sublist. 



ATTRIBUTES 



The same variable symbol may not be used 
as a symbolic parameter and as a SET symbol 
in the same macro-definition. 

The following illustrates this rule. 



The assembler assigns attributes to macro- 
instruction operands and to symbols in the 
program. These attributes may be referred 
to only in conditional assembly 
instructions. 



JName j operation | operand 
| SNAME | MOVE | STO, SFROM 



1 

I 

— -I 

I 
J 



There are six kinds of attributes, 
are: type, length, scaling, integer, 
count, and number. 



They 



If the statement above is a prototype 
statement, then SNAME, STO, and SFROM may 
not be used as SET symbols in the macro- 
definition. 

The same variable symbol may not be used 
as two different types of SET symbols in 
the same macro-definition. Similarly, the 
same variable symbol may not be used as two 
different types of SET symbols outside 
macro- definitions. 

For example, if SA is a SETA symbol in a 
macro-definition, it cannot be used as a 
SETC symbol in that definition. Similarly, 
if SA is a SETA symbol outside macro- 
definitions, it cannot be used as a SeTc 
symbol outside macro-definitions. 

The same variable symbol if declared 
local may be used in two or more macro- 
definitions and outside macro-definitions. 
If such is the case, the variable symbol 
will be considered a different variable 
symbol each time it is used. 

For example, if Sa is a variable symbol 
(either SET symbol or symbolic parameter) 
in one macro-definition, it can be used as 
a variable symbol (either SET symbol or 
symbolic parameter) in another definition. 
Similarly, if SA is a variable symbol (SET 
symbol or symbolic parameter) in a macro- 
definition, it can be used as a SET symbol 
outside macro-definitions. 

All variable symbols may be concatenated 
with other characters in the same way as 
symbolic parameters. The rules for 
concatenation are in Section 7 under the 
subsection Model Statements . 

Variable symbols in macro-instructions 
are replaced by the values assigned to 
them, immediately prior to the start of 



If an outer macro-instruction operand is 
a symbol before substitution, then the 
attributes of the operand are the same as 
the corresponding attributes of the symbol. 
The symbol must appear in the name entry of 
an assembler language statement or in the 
operand entry of an EXTRN statement in the 
program. The statement must be outside 
macro-definitions and must not contain any 
variable symbols. 

If an inner macro-instruction operand i 
a symbolic parameter, then attributes of 
the operand are the same as the attributes 
of the corresponding outer macro- 
instruction operand. 

Each attribute has a notation associated 
with it- The notations are: 



Attribute 


Notation 


Type 


T . 


Length 


L f 


Scaling 


S' 


Integer 


I' 


Count 


K f 


Number 


N* 



If a macro-instruction operand is a 
sublist, the programmer may refer to the 
attributes of either the sublist or each 
operand in the sublist. The type, length, 
scaling, and integer attributes of a 
sublist are the same as the corresponding 
attributes of the first operand in the 
sublist. 

All the attributes of macro-instruction 
operands may be referred to in conditional 
assembly instructions within macro- 
definitions. However, only the type, 
length, scaling, and integer attributes of 
symbols may be referred to in conditional 
assembly instructions outside macro- defi- 
nitions. Symbols appearing in the name 
entry of generated statements are not 
assigned attributes. 
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The programmer may refer to an attribute 
in the following ways: 

1- In a statement that is outside macro- 
definitions, he may write the notation 
for the attribute immediately followed 
by a symbol. (E.g., T'NAME refers to 
the type attribute of the symbol NAME. ) 

2. In a statement that is in a macro- 
definition, he may write the notation 
for the attribute immediately followed 
by a symbolic parameter. (E.g., 
L* 6NAME refers to the length attribute 
of the characters in the macro- 
instruction that correspond to symbolic 
parameter 6NAME; L'SNAME(2) refers to 
the length attribute of the second 
operand in the sublist that corresponds 
to symbolic parameter SNAME.) 



Type Attribute (T*) 



The type attribute of a macro- instruction 
operand or a symbol is a letter. 

The programmer may refer to a type 
attribute in the operand of a SETC instruc- 
tion, or in character relations in the 
operands of SETB or AIF instruction, or in 
other instructions where use of the charac- 
ter is valid. 

The following letters are used for sym- 
bols that name DC and DS statements and for 
outer macro-instruction operands that are 
symbols that name DC or DS statements. 



A A- type address constant, 

implied length, aligned. 
B Binary constant. 
C Character constant. 
D Long floating-point constant, 

implied length, aligned. 
E Short floating-point constant, 

implied length, aligned. 
F Full-word fixed-point constant, 

implied length, aligned. 
G Fixed-point constant, explicit 

length. 
H Half-word fixed-point constant, 

implied length, aligned. 
K Floating-point constant, 

explicit length - 
P packed decimal constant. 
R A-, S-, V-, or Y-type address 

constant, explicit length. 
S S-type address constant, 

implied length, aligned. 

V V-type address constant, 
implied length, aligned. 

X Hexadecimal constant. 

Y Y-type address constant, 
implied length, aligned. 

Z Zoned decimal constant. 



The following letters are used for sym- 
bols (and outer macro-instruction operands 
that are symbols) that name statements 
other than DC or DS statements, or that 
appear in the operand field of an EXTRN 
or WXTRN statement. 

I Machine instruction 

J Control Section Name 

M Macro instruction 

T EXTRN symbol 

W CCW instruction 

$ WXTRN symbol 

The following letters are used for inner 
and outer macro-instruction operands only. 

N Self -defining term 
Omitted operand 

The letter U (Undefined) is used for 
inner and outer macro-instruction operands 
that cannot be assigned any of the above 
letters. The type attribute of all liter- 
als appearing as macro-instruction operands 
is U. This also is true for inner macro- 
instruction operands that are ordinary 
symbols or variable symbols. Because the 
attributes are not available at the 
necessary time, this letter is also 
assigned to symbols that name EQU and LTORG 
statements, to any symbols occurring more 
than once in the name entry of source 
statements, and to all symbols naming DC 
and DS statements with expressions or vari- 
able symbols as modifiers. The type attri- 
bute also is undefined when the modifier 
expression consists solely of self-defining 
terms. 

The attributes of A, B, C, and D in the 
following examples are undefined: 

A DC 3FL(A-B) , 15 t 

B DC (A-B)F'15* 

C DC SX^l* 

D DC FL(3-2) , l f 



Length (L*), Scaling (S') t and Integer (I*) 
Attributes 



The length, scaling, and integer attributes 
of macro- instruction operands and symbols 
are numeric values. 

The length attribute of a symbol (or of 
a macro-instruction operand that is a 
symbol) is as described in Part I of this 
publication. Reference to the length 
attribute of a variable symbol is illegal 
except for symbolic parameters in SETA, 
SETB, and AIF statements. If the basic L* 
attribute is desired, it can be obtained as 
follows : 

6 A SETC *Z* 
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SB SETC • L* • ' 

MVC &A. (SB6A),X 
\ After generation, this would result in 
V^y MVC Z(L»Z),X 

Reference must not be made to the length 
attributes of symbols or macro-instruction 
operands whose type attributes are the 
| letters M, N, 0, T, $, or U. 

Scaling and integer attributes are pro- 
vided for symbols that name fixed-point, 
floating-point, and decimal DC or DS state- 
ments. 



Fixed and Floatin g Point; The scaling 
attribute of a fixed point or floating 
point number is the value given by the 
scale modifier. The integer attribute is a 
function of the scale and length attributes 
of the number. 



Decimal; The scaling attribute of a deci- 
mal number is the number of decimal digits 
to the right of the decimal point. The 
integer attribute of a decimal number is 
the number of decimal digits to the left of 
the decimal point. 

Scaling and integer attributes are 
available for symbols and macro-instruction 
( \ operands only if their type attributes are 
* .' H, F, and G (fixed point) ; D, E, and K 
s (floating point); or P and Z (decimal). 

The programmer may refer to the length, 
scaling, and integer attributes in the 
operand field of a SETA instruction, or in 
arithmetic relations in the operand fields 
of SETB or AIF instructions. 



The programmer may refer to the count 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro-definition. 



Number Attribute (N* ) 



The programmer may refer to the number 
attribute of macro-instruction operands 
only . 

The number attribute is a value equal to 
the number of operands in an operand sub- 
list. The number of operands in an operand 
sublist is equal to one plus the number of 
commas that indicate the end of an operand 
in the sublist. 



The following examples illustrate 
rule. 



this 



(A,B,C,D,E) 
(A,,C, D, E) 
(A,B,C,D) 
(,B,C,D,E) 
(A,B,C,D,) 
(A,B,C,D, ,) 



operands 
operands 
operands 
operands 
operands 
operands 



If the macro-instruction operand is not 
a sublist, the number attribute is one. If 
the macro-instruction operand is omitted, 
the number attribute is zero. 

The programmer may refer to the number 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro- definition. 



Count Attribute (K») 



The programmer may refer to the count 
attribute of macro-instruction operands 
only. 

The count attribute is a value equal to 
the number of characters in the macro- 
instruction operand after substituting for 
variable symbols, excluding commas. If the 
operand is a sublist, the count attribute 
includes the beginning and ending 
parentheses and the commas within the sub- 
list. The count attribute of an omitted 
operand is zero. 

If a macro-instruction operand contains 
variable symbols, the characters that 
replace the variable symbols, rather than 
the variable symbols, are used to determine 
the count attribute. 



Assig ni ng I nteg er At tributes to Symbols 



The integer attribute is computed from the 
length and scaling attributes. 



Fixed Point; The integer attribute of a 
fixed- point number is equal to eight times 
the length attribute of the number minus 
the scaling attribute minus one; i.e., 
j^BKL'-S'-l. 

Each of the following statements defines 
a fixed-point field. The length attribute 
of HALFCON is 2, the scaling attribute is 
6, and the integer attribute is 9. The 
length attribute of ONECON is 4, the scal- 
ing attribute is 8, and the integer attri- 
bute is 23. 
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r t t 1 

| Name (Operation | Operand | 

j. + — x ^ 

|HALFCON JDC |H36 , -25.93* | 

(ONECON (DC |FS8 , 100.3E-2* j 

L x x J 



Floating Point: The integer attribute of a 
floating-point number is equal to two times 
the difference between the length attribute 
of the number and one, minus the scaling 
attribute; i.e., I»=2* (L* -1)-S f . 

Each of the following statements defines 
a floating-point value. The length attri- 
bute of SHORT is 4 , the scaling attribute 
is 2, and the integer attribute is 4. The 
length attribute of LONG is 8, the scaling 
attribute is 5, and the integer attribute 
is 9. 



SEQUENCE SYMBOLS 



The name entry of a statement may contain a 
sequence symbol. Sequence symbols provide 
the programmer with the ability to vary the 
sequence in which statements are processed 
by the assembler. 



A sequence symbol is used in the operand 
entry of an AIF or AGO statement to refer 
to the statement named by the sequence 
symbol . 



A sequence symbol may be used in the 
name entry of any statement that does not 
contain a symbol or SET symbol, except a 
prototype statement, or a MACRO, LCLA, 
LCLB, LCLC, GBLA, GBLB, GBLC, ACTR, ICTL, 
ISEQ, or COPY instruction. 



r t t 1 

| Name (Operation (Operand | 

j. ._ + x j 

(SHORT (DC |ES2*46.415 , j 

|L0N3 | DC |DS5* -3.729* j 

l X X J 



Decimal : The integer attribute of a packed 
decimal number is equal to two times the 
length attribute of the number minus the 
scaling attribute minus one; i.e. , 
I*=2*L*-S'-1. The integer attribute of a 
zoned decimal number is equal to the dif- 
ference between the length attribute and 
the scaling attribute; i.e., I f =L*-S'. 

Each of the following statements defines 
a decimal field. The length attribute of 
FIRST is 2, the scaling attribute is 2, and 
the integer attribute is 1. The length 
attribute of SECOND is 3, the scaling 
attribute is 0, and the integer attribute 
is 3. The length attribute of THIRD is 4, 
the scaling attribute is 2, and the integer 
attribute is 2. The length attribute of 
FOURTH is 3, the scaling attribute is 2, 
and the integer attribute is 3. 



r T T 

J Name | Operation | Operand 

| FIRST (DC | P' +1.25* 

| SECOND | DC |Z , -543 f 

(THIRD (DC | Z* 79.68* 

(FOURTH | DC | P* 79. 68' 

i—~ x ■ x 



A sequence symbol consists of a period 
followed by one through seven letters 
and/or digits, the first of which must be a 
letter. 

The following are valid sequence sym- 
bols: 

.READER .A23456 
. LOOP2 . X4 F2 
.N .S4 

The following are invalid sequence sym- 
bols: 

CARDAREA (first character is not 

a period) 
. 246B (first character after 

period is not a letter) 
.AREA2456 (more than seven characters 

after period) 
. BCD%84 (contains a special character 

other than initial period) 
.IN AREA (contains a special 

character, i.e., blank, 

other than initial period) 

If a sequence symbol appears in the name 
entry of a macro- instruct ion, and the cor- 
responding prototype statement contains a 
symbolic parameter in the name entry, the 
sequence symbol does not replace the sym- 
bolic parameter wherever it is used in the 
macro-definition. 

The following example illustrates this 
rule. 
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I 

|Name 


(Operation 


j Operand 


1 

1 




I 


-+ 

j MACRO 


_x 

1 


._ H 


1 


| 6 NAME 


|MOVE 


|STO,6FROM 




2 


| 6 NAME 


|ST 
|ST 


| 2, SAVEAREA 

|2, 6 FROM 

|2,STO 

| 2 , SAVEAREA 






I 

l-SYM 


|MEND 
|MOVE 


1 

| FIELDA, FIELDB 


-H 


3 




I 


._X 


-J 


__ H 


4 




|ST 

|L 

JST 


| 2 , SAVEAREA 
| 2, FIELDB 
| 2, FIELDA 
| 2 , SAVEAREA 






I 


—X — — — 


— X — — — _____ 


j 



The symbolic parameter 6NAME is used in 
the name entry of the prototype statement 
(statement 1) and the first model statement 
(statement 2). In the macro instruction 
(statement 3) a sequence symbol (.SYM) 
corresponds to the symbolic parameter 
SNAME. SNAME is not replaced by -SYM, and, 
therefore, the generated statement 
(statement 4) does not contain a name 
entry. 



LCLA. LCLB. LCLC — DEFINE SET SYMBOLS 



The typical form of these instructions is: 

j Name j Operation! Operand j 

| Not used, j LCLA, jone or more variable 
j must not | LCLB, or | symbols, that are 
| be j LCLC | to be used as SET 
j present j | symbols, separated 
| j j . | by commas 
l . l l J 



The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to SETA, SETB, and SETC symbols, 
respectively. The SETA, SETB, and SETC 
symbols are assigned the initial values of 
0, 0, and null character value, respective- 
ly- 

The programmer should not define any SET 
symbol whose first four characters are 
6SYS. 

All LCLA, LCLB, or LCLC instructions in 
a macro definition must appear immediately 
after the prototype statement and all GBLA, 
GBLB or GBLC instructions. All LCLA, LCLB, 
or LCLC instructions outside macro 
definitions must appear after all macro 
definitions in the source program, after 



all GBLA, GBLB, and GBLC instructions 
outside macro definitions, before all con- 
ditional assembly instructions, and PUNCH 
and REPRO statements outside macro 
definitions, and before the first control 
section of the program. 



SETA — SET ARITHMETIC 



The SETA instruction may be used to assign 
an arithmetic value to a SETA symbol. The 
form of this instruction is: 



JName j Operation | Operand | 

| A SETA | SETA |A SETA arithmetic | 
j symbol j j expression j 

i x l J 



The expression in the operand entry is 
evaluated as a signed 32-bit arithmetic 
value which is assigned to the SETA symbol 
in the name entry. The minimum and maximum 
allowable values of the expression are -2 3a - 
and +2 3± -l, respectively. 

The expression may consist of one term 
or an arithmetic combination of terms. The 
terms that may be used alone or in 
combination with each other are self- 
defining terms, variable symbols, and the 
length, scaling, integer, count, and number 
attributes. Self-defining terms are 
described in Part 1 of this publication. 

Note : A SETC variable symbol may appear 
in a SETA expression only if the value of 
the SETC variable is one to eight decimal 
digits. The decimal digits will be con- 
verted to a positive arithmetic value. 

The arithmetic operators that may be 
used to combine the terms of an expression 
are + (addition), - (subtraction), 
* (multiplication), and / (division). 

An expression may not contain two terms 
or two operators in succession, nor may it 
begin with an operator. 

The following are valid operand fields 
of SETA instructions: 



SAREA+X^D' 

£BETA*10 

L , 6HERE+32 



I , 6N/25 

6EXIT-S f SENTRY+1 
29 



The following are invalid operand fields 
of SETA instructions: 
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SAREAX'c* (two terms in succession) 
6FIELD+- (two operators in succession) 
-6DELTA*2 (begins with an operator) 
*+32 (begins with an operator; 

two operators in succession) 
NAME /l 5 (NAME is not a valid term) 



increased by one for each occurrence of a 
variable symbol as well as the operation 
entry- The maximum value this counter may 
attain is 35. (See Appendix H). 



EVALUATION OF ARITHMETIC EXPRESSIONS 



Using SETA Symbols 



The procedure used to evaluate the arith- 
metic expression in the operand of a SETA 
instruction is the same as that used to 
evaluate arithmetic expressions in assem- 
bler language statements- The only 
difference between the two types of arith- 
metic expressions is the terms that are 
allowed in each expression. 

The following evaluation procedure is 
used: 



1- Each term is given its numerical 
value. 

2. The arithmetic operations are per- 
formed moving from left to right. 
However, multiplication and/or divi- 
sion are performed before addition and 
subtraction. 

3. The computed result is the value 
assigned to the SETA symbol in the 
name entry. 

The arithmetic expression in the operand 
entry of a SETA instruction may contain one 
or more sequences of arithmetically com- 
bined terms that are enclosed in parenthe- 
ses- A sequence of parenthesized terms may 
appear within another parenthesized 
sequence. 

The following are examples of SETA 
instruction operands that contain parenthe- 
sized sequences of terms. 

(L , SHERE+32)*29 

eAREA+X'2D' /(SEXIT-S*6ENTRY+1) 

SBETA+10* (I ' SN/25/ ( &EXIT-S* SENTRY+1) ) 

The parenthesized portion or portions of 
an arithmetic expression are evaluated 
before the rest of the terms in the expres- 
sion are evaluated- if a sequence of 
parenthesized terms appears within another 
parenthesized sequence, the innermost 
sequence is evaluated first. 

The SETA arithmetic expression can only 
have five levels of parentheses. The 
parentheses required in subscripting, sub- 
string, and sublist notation count when 
determining these levels. A counter is 
maintained for each SETA statement and 



The arithmetic value assigned to a SETA 
symbol is substituted for the SETA symbol 
when it is used in an arithmetic relation. 
If the SETA symbol is not used in an arith- 
metic expression, the arithmetic value is 
completely converted to an unsigned inte- 
ger, with leading zeros removed- If the 
value is zero, it is converted to a single 
zero. 



The following example illustrates this 
rule: 





|Name 
1 


p 

| Opera t. 

-H 

j MACRO 


T ~ 

Lon J Operand 


1 

4 






| SNAME 


|MOVE 
JLCLA 


|6T0,SFR0M 
| SA,5B,SC,&D 




1 


|£A 


JSETA 


|10 




2 


|6B 


|SETA 


|12 




3 


jsc 


JSETA 


| 6 A- SB 




4 


|6D 


| SETA 


j&A+SC 






1 6NAME 


jST 


j 2, SAVEAREA 




5 




|L 


| 2,6FR0MSC 




6 




JST 
l L 


|2,6T06D 

J 2 , SAVEAREA 






1 

(HERE 

|HERE 


JMEND 
jMOVE 
|ST 


| FIELDA, FIELDB 


1 






j 2, SAVEAREA 






1L 


|2,FIELDB2 








|ST 


|2,FIELDA8 






[ 


|L 


| 2, SAVEAREA 

X 


J 



Statements 1 and 2 assign to the SETA 
symbols €A and 6B the arithmetic values +10 
and +12, respectively- Therefore, state- 
ment 3 assigns the SETA symbol 6C the 
arithmetic value -2. When Sc is used in 
statement 5, the arithmetic value -2 is 
converted to the unsigned integer 2. When 
SC is used in statement 4, however, the 
arithmetic value -2 is used. Therefore, £D 
is assigned the arithmetic value +8. When 
SD is used in statement 6, the arithmetic 
value +8 is converted to the unsigned inte- 
ger 8. 

The following example shows how the 
value assigned to a SETA symbol may be 
changed in a macro definition. 
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r — 

| Name 

1 


| Operation 


| Operand 


1 

1 
) 




| MACRO 






| 6 NAME 


|MOVE 
| LCLA 


|STO,SFROM 
j&A 




1 


|SA 


|SETA 


|5 






| 6 NAME 


|ST 


| 2 , SAVEAREA 




2 




|L 


|2,SFROMSA 




3 


|&A 


|SETA 


|8 




4 




|ST 


|2,STOSA 

| 2 , SAVEAREA 






J 

JHERE 


|MEND 
|MOVE 


|FIELDA,FIELDB 


-1 






I 


._.). 


-.. l ,,. 


_ j 




1 


1 




|HERE 


| ST 

|L 

|ST 


| 2, SAVEAREA 

J2.FIELDB5 

|2,FIELDA8 






[ 


|L 


| 2 , SAVEAREA 





Statement 1 assigns the arithmetic value 
+5 to SETA symbol SA. In statement 2, SA 
is converted to the unsigned integer 5- 
Statement 3 assigns the arithmetic value +8 
to SA. in statement i», therefore, SA is 
converted to the unsigned integer 8, 
instead of 5. 



JName | Operation | Operand j 

MACRO 

' 6 NUMBER, 6 REG 
SLAST 
N' SNUMBER 
SREG,S NUMBER (1) 
&REG , SNUMBER ( SLAST) 
SREG, SNUMBER (1) 



ADDX 



|ADDX 
I LCLA 
SLAST j SETA 
|L 
|A 
| ST 
j MEND 



(A,B,C,D,E) ,3 




SNUMBER is the first symbolic parameter 
in the operand entry of the prototype 
statement (statement 1). The corresponding 
characters, (A,B,C,D,E), of the macro- 
instruction (statement U) are a sublist. 
Statement 2 assigns to SLAST the arithmetic 
value +5, which is equal to the number of 
operands in the sublist. Therefore, in 
statement 3, SNUMBER (SLAST) is replaced by 
the fifth operand of the sublist. 



i A SETA symbol may be used with a symbol- 

ic parameter to refer to an operand in an 
operand sublist* If a SETA symbol is used 
for this purpose it must have been assigned 
a value in the range 1 to 100. 



SETC — SET CHARACTER 



The SETc instruction is used to assign a 
character value to a SETC symbol. The form 
of this instruction is: 



Any expression that may be used in the 
operand of a SETA instruction may be used 
to refer to an operand in an operand sub- 
list. 



Sublists are described in Section 8 
under Operand Sublists . 



The following macro-definition may be 
used to add the last operand in an operand 
sublist to the first operand in an operand 
sublist and store the result at the first 
operand. A sample macro- instruct ion and 
generated statements follow the macro- 
definition. 



Name 



A SETC 
symbol 



| Operation | Operand | 

_ + + -i 

| SETC jOne operand, of | 
j | the form described | 

| j below j 



The operand may consist of the type 
attribute, a character expression, a 
substring notation, or a concatenation of 
substring notations and character expres- 
sions. A SETA symbol may appear in the 
operand of a SETC statement. The result is 
the character representation of the decimal 
value, unsigned, with leading zeros 
removed. If the value is zero, one decimal 
zero is used. 



TYPE ATTRIBUTE 



The character value assigned to a SETC 
symbol may be a type attribute. If the 
type attribute is used, it must appear 
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alone in the operand field- The following 
example assigns to the SETC symbol 6TYPE 
the letter that is the type attribute of 
the macro-instruction operand that corre- 
sponds to the symbolic parameter 6 ABC. 



JName | Operation | Operand | 



| S LENGTH 



I SETC 



J • L* ♦ SYMBOL' | 



JName j Operation | Operand 
| STYPE | SETC | T* 6 ABC 



Variable symbols may be concatenated 
with other characters in the operand field 
of a SETC instruction according to the 
general rules for concatenating variable 
symbols with other characters (see Section 
7). 



CHARACTER EXPRESSION 



A character expression consists of any 
combination of characters enclosed in apos- 
trophes. The maximum length of a character 
expression is 127 characters. 

The character value enclosed in apos- 
trophes in the operand field is assigned to 
the SETC symbol in the name entry. The 
maximum length character value that can be 
assigned to a SETC symbol is eight charac- 
ters- if a value greater than 8 is speci- 
fied, the leftmost 8 characters will be 
used. 

EVALUATION OF CHARACTER EXPRESSIONS; The 
following statement assigns the character 
value AB5S4 to the SETC symbol 6 ALP HA: 

I T T 1 

| Name | Operat ion | Operand | 

| 6ALPHA | SETC | • AB%4 * | 



More than one character expression may 
be concatenated into a single character 
expression by placing a period between the 
terminating apostrophe of one character 
expression and the opening apostrophe of 
the next character expression- For exam- 
ple, either of the following statements may 
be used to assign the character value 
ABCDEF to the SETC symbol 6BETA. 



| Name j Operation J Operand 

| 6 BETA | SETC | • ABCDEF* 

| 6BETA | SETC | * ABC 1 . * DEF* 



-H 



If 6 ALPHA has been assigned the charac- 
ter value AB%4, the following statement may 
be used to assign the character value 
ABX4RST to the variable symbol S GAMMA. 



r t r 1 

| Name | Operation | Operand | 

l&GAMMA | SETC | * &ALPHA.RST* | 

j Name | Operation | Operand | 

j. + + .j 

j 6DELTA J SETC | * 6 ALPHA* . * RST* | 



Two ampersands must be used to represent 
an ampersand that is not part of a variable 
symbol. Both ampersands become part of the 
character value assigned to the SETC sym- 
bol. They are not replaced by a single 
ampersand . 

The following statement assigns the 
character value HALFS& to the SETC symbol 
SAND. 



JName | Operation | Operand | 

j. 1 ^ .j 

j SAND )SETC |*HALF&€* j 



In this example. 



j 



| Name | Operation | Operand | 

|6A | SETC | *&SBETA* (2,5) | 

* &&BETA* (2,5) produces 6BETA. which is 
considered a character string, not a varia- 
ble symbol. 



Two apostrophes must be used to rep- 
resent a apostrophe that is part of a char- 
acter expression. 

The following statement assigns the 
character value L* SYMBOL to the SETC symbol 
6 LENGTH. 



SUBSTRING NOTATION 



The character value assigned to a SETC 
symbol may be a substring character value. 
Substring character values permit the pro- 
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grammer to assign part of a character value 
to a SETC symbol. 

If the programmer wants to assign part 
of a character value to a SETC symbol, he 
must indicate to the assembler in the oper- 
and of a SETC instruction: (1) the charac- 
ter value itself, and (2) the part of the 
character value he wants to assign to the 
SETC symbol. The concatenation of CD and 
(2) in the operand of a SETC instruction is 
called a substring notation. The character 
value that is assigned to the SETC symbol 
in the name entry is called a substring 
character value. 

Substring notation consists of a charac- 
ter expression, immediately followed by two 
arithmetic expressions that are separated 
from each other by a comma and are enclosed 
in parentheses. These parentheses count 
when determining the number of levels of 
parentheses. The two arithmetic expres- 
sions may be any expression that is allowed 
in the operand of a SETA instruction. They 
may not be zero. 

The first expression indicates the first 
character (in the character expression) 
that is to be assigned to the SETC symbol 
in the name entry. The second expression 
indicates the number of consecutive charac- 
ters in the character expression (starting 
with the character indicated by the first 
expression) that are to be assigned to the 
SETC symbol, if a substring specifies more 
characters than are in the character 
string, the number of available characters 
will be supplied. 

The maximum size character expression 
the substring character value can be chosen 
from is 127 characters. 

The following are valid substring nota- 
tions: 



' SULPHA* (2,5) 
•AB%4* UAREA+2,1) 
•SALPHA* .'RST* (6,SA) 
•ABCSGAMMA 1 (SA,SAREA+2) 



The following are invalid substring 
notations: 

•SBETA 1 (4,6) 

(blanks between character value 
and arithmetic expressions) 
*L'* SYMBOL' (14 2-SXYZ) 

(only one arithmetic expression) 
•AB% 4 SALPHA* (8 6 FIELD* 2) 

(arithmetic expressions 
not separated by a comma) 
' BETA* 4 , 6 

(arithmetic expressions 

not enclosed in parentheses) 
'SALPHA* (2,4) (1,1) 



(double substring notation is not 
permitted) 



CONCATENATING SUBSTRING NOTATIONS AND CHAR- 
ACTER EXPRESSIONS: Substring notations may 
be concatenated with character expressions 
in the operand of a SETC instruction. If a 
substring notation follows a character 
expression, the two may be concatenated by 
placing a period between the terminating 
apostrophe of the character expression and 
the opening apostrophe of the substring 
notation. 



For example, if SALPHA has been assigned 
the character value AB%4, and 6BETA has 
been assigned the character value ABCDEF, 
then the following statement assigns SGAMMA 
the character value AB%4BCD. 



| Name | Operation j Operand | 

I 1 + ., 

J6GAMMA JSETC | • SALPHA*. • SBETA' (2 ,3) j 



If a substring notation precedes a char- 
acter expression or another substring nota- 
tion, the two may be concatenated by writ- 
ing the opening apostrophe of the second 
item immediately after the closing paren- 
thesis of the substring notation. 

The programmer may optionally place a 
period between the closing parenthesis of a 
substring notation and the opening apos- 
trophe of the next item in the operand. 

If SALPHA has been assigned the charac- 
ter value AB%4, and 6ABC has been assigned 
the character value 5RS, either of the 
following statements may be used to assign 
SWORD the character value AB5S45RS. 



| Name j Operation! Operand 
| + + . 

j SWORD JSETC | •SALPHA 1 (1,4) * SABC ' | 
j SWORD | SETC | •SALPHA* (1,4) 'SABC* (1,3) | 
l ± J. J 






If a SETC symbol is used in the operand 
of a SETA instruction, the character value 
assigned to the SETC symbol must be one to 
eight decimal digits. 

If a SETA symbol is used in the operand 
of a SETC statement, the arithmetic value 
is converted to an unsigned integer with 
leading zeros removed. If the* value is 
zero, it is converted to a single zero. 
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Using SETC Symbols 



The character value assigned to a SETC 
symbol is substituted for the SETC symbol 
when it is used in the name, operation, or 
operand of a statement. 



statement 2. Statement 3 assigns the char- 
acter value AREA to SPREFIX. Therefore, 
SPREFIX is replaced by AREA, instead of 
FIELD, in statement 4. 

The following example illustrates the 
use of a substring notation as the operand 
field of a SETC instruction. 



For example, consider the following 
macro- definition, macro-instruction, and 
generated statements. 

I Name | Operation | Operand j 




+- 



H 



STO, SFROM 

6 PREFIX 

'FIELD* 

2,SAVEAREA 

2,SPREFIXSFR0M 

2,6PREFIXSTO 

2 , SAVEAREA 

A, B 

2, SAVEAREA 
2,FIELDB 
2 , FIELDA 
2, SAVEAREA 



Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. In 
statements 2 and 3, SPREFIX is replaced by 

FIELD. 



(Operand | 

I 

j 6 TO, £ FROM 
| SPREFIX 
TSTO' (1,5) 
j 2 , SAVEAREA 
|2,SPREFIXSFR0M 
|2,ST0 
2, SAVEAREA 



"I 

|FIELDA,B 



| Name (Operation 

| MACRO 
SNAME | MOVE 

|LCLC 
SPREFIX | SETC 
SNAME | ST . 

|L 

|ST 

|L 

| MEND 

HERE | MOVE 

HERE |ST | 2 , SAVEAREA 
|L |2,FIELDB 
|ST | 2, FIELDA 
| L | 2 , SAVEAREA 
l j J J 



Statement 1 assigns the substring char- 
acter value FIELD (the first five charac- 
ters corresponding to symbolic parameter 
STO) to the SETC symbol SPREFIX. There- 
fore, FIELD replaces SPREFIX in statement 
2. 



The following example shows how the 
value assigned to a SETC symbol may be 
changed in a macro- definition. 



| Name 
j 



SNAME 

SPREFIX 
SNAME 

SPREFIX 



j Operation | Operand j 

MACRO 

STO, SFROM 

SPREFIX 

•FIELD' 

2, SAVEAREA 

2,SPREFIX6FROM 

'AREA' 

2,SPREFIX6TO 

2, SAVEAREA 



| 

HERE 



MOVE 
LCLC 
SETC 
ST 
L 

SETC 
ST 
L 
MEND 
.] 

MOVE 






HERE 1ST 
L 
ST 
L 



A,B 






2, SAVEAREA 

2,FIELDB 

2,AREAA 

2 , SAVEAREA 



Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. There- 
fore, SPREFIX is replaced by FIELD in 



SETB — SET BINARY 



The SETB instruction may be used to assign 
the binary value or 1 to a SETB symbol. 
The form of this instruction is: 



JName | Operation! Operand | 

| A SETB | SETB |A or a 1,(0) or (1),| 

j symbol j | or a logical ex- | 

j J | pression enclosed in j 

j j j parentheses j 



The operand may contain a or a 1 or a 
logical expression enclosed in parentheses. 
(No explicit binary zeros or ones are 
allowed in parentheses other than in the 
form (0) or (1).) A logical expression is 
evaluated to determine if it is true or 
false; the SETB symbol in the name entry is 
then assigned the binary value 1 or cor- 
responding to true or false, respectively. 
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Note : The parentheses enclosing a logi- 
cal expression do not count towards the 
parenthesis level limit. 

A logical expression consists of one 
term or a logical combination of terms. 
The terms that may be used alone or in 
combination with each other are arithmetic 
relations, character relations, and SETB 
symbols. The logical operators used to 
combine the terms of an expression are AND, 
OR, and NOT. 

A logical expression may not contain two 
terms in succession. A logical expression 
may contain two operators in succession 
only if the first operator is either AND or 
OR and the second operator is NOT. A logi- 
cal expression may begin with the operator 
NOT. It may not begin with the operators 
AND or OR. 

An arithmetic relation consists of two 
arithmetic expressions connected by a rela- 
tional operator. A character relation 
consists of two character strings connected 
by a relational operator. The relational 
operators are EQ (equal), NE (not equal), 
LT (less than), 3T (greater than), LE (less 
than or equal), and GE (greater than or 
equal). 

Any expression that may be used in the 
operand of a SETA instruction, may be used 
as an arithmetic expression in the operand 
of a SETB instruction. Anything that may 
be used in the operand of a SETC instruc- 
tion, may be used as a character string in 
the operand of a SETB instruction. This 
includes substring and type attribute nota- 
tions. The maximum size of the character 
values that can be compared is 127 charac- 
ters. If the two character values are of 
unequal length, then the shorter one will 
always compare less than the longer one, 
regardless of the characters present. 

The relational and logical operators 
must be immediately preceded and followed 
by at least one blank or other special 
character. Each relation may or may not be 
enclosed in parentheses. If a relation is 
not enclosed in parentheses, it must be 
separated from the logical operators by at 
least one blank or other special character. 



The following are valid operand fields 
of SETB instructions: 



(&AREA+2 GT 29 OR &B) 

(NOT SB AND &AREA+X'2D* GT 29) 

( 'SC'EQ'MB') 



The following are invalid operand fields 
of SETB instructions: 



SB 



(not enclosed in parentheses) 



(&AREA+2 GT 29) 
(' AB%4 f EQ ' & ALPHA') 
(T'&ABC NE T'&XYZ) 
(T' SP12 EQ ' F') 



(T'SP12 EQ ' F» SB) 

(two terms in succession) 
('ABM' EQ •ALPHA* NOT SB) 

(the NOT operator must be 
preceded by AND or OR) 
(AND T'6P12 EQ 'F') 

(expression begins with AND) 



Evaluation of Logical Expressions 



The following procedure is used to evaluate 
a logical expression in the operand field 
of a SETB instruction: 

1. Each term (i.e. , arithmetic relation, 
character relation, or SETB symbol) is 
evaluated and given its logical value 
(true or false) . 

2. The logical operations are performed 
moving from left to right. However, 
NOTs are performed before ANDs, and 
ANDs are performed before ORs. 

3. The computed result is the value 
assigned to the SETB symbol in the 
name field. 

The logical expression in the operand of 
a SETB instruction may contain one or more 
sequences of logically combined terms that 
are enclosed in parentheses. A sequence of 
parenthesized terms may appear within 
another parenthesized sequence. 

The following are examples of SETB 
instruction operands that contain parenthe- 
sized sequences of terms. 

(NOT(&B AND SAREA+X^D' GT 29)) 
(6B AND(T f &P12 EQ'F'OR&B) 

The parenthesized portion or portions of 
a logical expression are evaluated before 
the rest of the terms in the expression are 
evaluated. If a sequence of parenthesized 
terms appears within another parenthesized 
sequence, the innermost sequence is evalu- 
ated first. 

Logical expressions may have only five 
levels of parentheses. Subscripting, 
substring notation, and logical expression 
nesting count when determining the level of 
parentheses. The parentheses surrounding 
the SETB operand do not count. A counter 
is maintained for each statement and is 
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increased by one for each occurrence of a 
variable symbol and an operation entry. 
The maximum value this counter may attain 
is 35. See Appendix H. 



the character value is substituted for 
6B2 in statement 1 . 



Usi ng SE TB Symbols 



The logical value assigned to a SETB symbol 
is used for the SETB symbol appearing in 
the operand of an AIF instruction or anoth- 
er SETB instruction. 

If a SETB symbol is used in the operand 
of a SETA instruction, or in arithmetic 
relations in the operands of AIF and SETB 
instructions, the binary values 1 (true) 
and (false) are converted to the arith- 
metic values +1 and +0, respectively. 

If a SETB symbol is used in the operand 
of a SETC instruction, in character rela- 
tions in the operands of AIF and SETB 
instructions, or in any other statement, 
the binary values 1 (true) and (false), 
are converted to the character values 1 and 
0, respectively. 

The following example illustrates these 
rules. It is assumed that L'STO EQ 4 is 
true, and S'STO EQ is false. 



| Name | Operation |Operand 
j. + + 





| MACRO 




SNAME 


| MOVE 


&TO, SFROM 




|LCLA 


SA1 




|LCLB 


SB1,SB2 




| LCLC 


&C1 


SB1 


|SETB 


(L'STO EQ 4) 


6B2 


| SETB 


(S'STO EQ 0) 


SA1 


|SETA 


SBl 


&C1 


|SETC 


'6B2' 


&NAME 


1ST 


2 , SAVEAREA 




|L 


2,6FR0M5A1 




|ST 


2,STO&Cl 




|L 


2, SAVEAREA 




|MEND 






x_ J 


L_ _ _ 




T 


— - 


HERE 


jMOVE 


FIELDA,FIELDB 




_±. 


L 




T 





HERE 


|ST 


2, SAVEAREA 




1L 


2,FIELDB1 




|ST 


2,FIELDA0 




|L 


2 , SAVEAREA 



L X J. J 



Because the operand of statement 1 is 
true, 6B1 is assigned the binary value 1. 
Therefore, the arithmetic value +1 is sub- 
stituted for 6B1 in statement 3. Because 
the operand of statement 2 is false, 6B2 is 
assigned the binary value 0. Therefore, 



AIF — CONDITIONAL BRANCH 



The AIF instruction is used to alter condi- 
tionally the sequence in which source pro- 
gram statements are 'processed by the assem- 
bler. The typical form of this instruction 
is: 



Name 



l 

| A se- 
| quence 
J symbol or 
jnot used 



■t t 

| Operation | Operand 



| AIF | A logical expression 

| | enclosed in paren- 

| J theses, immediately 

| | followed by a 

j | sequence symbol 

J. J. 



Any logical expression that may be used 
in the operand of a SETB instruction may be 
used in the operand of an AIF instruction. 
However, the forms 

AIF (0), sequence symbol and 

AIF (1), sequence symbol 
are invalid. The sequence symbol in the 
operand must immediately follow the closing 
parenthesis of the logical expression. AIF 
operand entries must not contain explicit 
zeros or ones . 

Note ; The parentheses enclosing the 
logical expression do not count toward the 
level limit. 

The logical expression in the operand is 
evaluated to determine if it is true or 
false. If the expression is true, the 
statement named by the sequence symbol in 
the operand is the next statement processed 
by the assembler; however, sequence check- 
ing is not affected. If the expression is 
false, the next sequential statement is 
processed by the assembler. 

The statement named by the sequence 
symbol may precede or follow the AIF 
instruction. 

If an AIF instruction is in a macro- 
definition, then the sequence symbol in the 
operand must appear in the name entry of a 
statement in the definition. If an AIF 
instruction appears outside macro- 
definitions, then the sequence symbol in 
the operand must appear in the name entry 
of a statement outside macro-definitions. 

The following are valid operands of AIF 
instructions : 



V_ 
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(6AREA+X , 2D f GT 29). READER 
(T'&P12 EQ 'F'). THERE 



The following are invalid operands of 
AIF instructions: 



(T'SABC NE T'&XYZ) (no sequence symbol) 
. XUF2 (no logical expression) 

(T'SABC NE T'&XYZ) .X4F2 

(blanks between logical 
expression and se- 
quence symbol) 

The following macro-definition may be 
used to generate the statements needed to 
move a full-word fixed-point number from 
one storage area to another. The 
statements will be generated only if the 
type attribute of both storage areas is the 
letter F. 



J Name j Operation | Operand 
L -J + 

MACRO 
MOVE 



6N 



&N 



| AIF 
JAIF 
JST 
|L 
| ST 
|L 
.END | MEND 



&T,SF 

(T*£T NE T'SF).END 

(T'ST NE 'FM.END 

2 , SAVE AREA 

2,&F 

2,&T 

2 , SAVEAREA 






The logical expression in the operand of 
statement 1 has the value true if the type 
attributes of the two macro-instruction 
operands are not equal. If the type attri- 
butes are equal, the expression has the 
logical value false. 

Therefore, if the type attributes are 
not equal, statement 4 (the statement named 
by the sequence symbol .END) is the next 
statement processed by the assembler. If 
the type attributes are equal, statement 2 
(the next sequential statement) is proc- 
essed. 

The logical expression in the operand of 
statement 2 has the value true if the type 
attribute of the first macro-instruction 
operand is not the letter F. If the type 
attribute is the letter F, the expression 
has the logical value false. 

Therefore, if the type attribute is not 
the letter F, statement 4 (the statement 
named by the sequence symbol .END) is the 
next statement processed by the assembler. 
If the type attribute is the letter F, 
statement 3 (the next sequential statement) 
is processed. 



AGO — UNCONDITIONAL BRANCH 



The AGO instruction is used to uncondi- 
tionally alter the sequence in which source 
program statements are processed by the 
assembler. The typical form of this 
instruction is: 



| Name | Operation | Operand j 

| A sequence j AGO |A sequence symbol j 

| symbol or j | | 

j not used | j j 



The statement named by the sequence 
symbol in the operand is the next statement 
processed by the assembler. 

The statement named by the sequence 
symbol may precede or follow the AGO 
instruction. 

If an AGO instruction is part of a 
macro-definition, then the sequence symbol 
in the operand must appear in the name 
entry of a statement that is in that defi- 
nition. If an AGO instruction appears 
outside macro-definitions, then the 
sequence symbol in the operand must appear 
in the name entry of a statement outside 
macro-definitions. 

The following example illustrates the 
use of the AGO instruction. 








|Name | Operation | Operand 


1 




\ + 


__ + 


— \ 




| | MACRO 








| &NAME I MOVE 


| 6T,6F 




1 


| |AIF 


| (T' 6T EQ 'F*). FIRST 




2 


1 | AGO 


| .END 




3 


| . FIRST j AIF 


j (T* &T NE T'&F) .END 






j &NAME j ST 


| 2, SAVEAREA 






1 l L 


|2,6F 






I 1ST 


|2,6T 






1 1L 


j 2, SAVEAREA 




a 


j.END |MEND 








L_ _ X _ 


— J. , 





Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the type attribute is 
not the letter F, statement 2 is the next 
statement processed by the assembler. 

Statement 2 is used to indicate to the 
assembler that the next statement to be 
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processed is statement 4 (the statement 
named by sequence symbol .END). 



ACTR — CONDITIONAL ASSEMBLY LOOP COUNTER 



The typical form of this instruction is: 



r t t 1 

| Name J Operation | Operand J 

| A se- |ANOP jNot used, must not j 
jquence | j be present j 

j symbol | | j 



The ACTR instruction is used to limit the 
number of AGO and AIF branches executed 
within a macro-definition or within the 
main source program. 



A separate ACTR statement may be used in 
each macro- definition and in the main pro- 
gram. These counters are independent. 



The form of this instruction is: 



JName | Operation j operand | 

| Not used | ACTR | Any valid SETA | 

| must not | j expression j 

j be present j j j 



This statement must immediately follow 
any global or local declarations, if any. 
This statement causes a counter to be set 
to the value in its operand. Each time an 
AGO or AIF branch is executed, the counter 
is decremented by one. If the count is 
zero before decrementing, the assembler 
takes one of two actions: 

1. If a macro definition is being proc- 
essed, the processing of it and any macros 
above it in a nest is terminated, and the 
next statement in the main portion of the 
program is processed. 

2. If the main portion of the program is 
being processed, conditional assembly is 
terminated, and the portion of the program 
generated so far is assembled. 

If an ACTR statement is not given, the 
assumed value of the counter is 150 for the 
D assembler and 4096 for the F assembler. 



If the programmer wants to use an AIF or 
AGO instruction to branch to another state- 
ment, he must place a sequence symbol in 
the name entry of the statement to which he 
wants to branch. However, if the program- 
mer has already entered a symbol or varia- 
ble symbol in the name entry of that state- 
ment, he cannot place a sequence symbol in 
the name entry. Instead, the programmer 
must place an ANOP instruction before the 
statement and then branch to the ANOP 
instruction. This has the same effect as 
branching to the statement immediately 
after the ANOP instruction. 

The following example illustrates the 
use of the ANOP instruction. 





|Name 


(Operation 
| MACRO 


| Operand | 






|SNAME 


JMOVE 


|6T,SF | 






|LCLC 


| STYPE 1 


1 




|AIF 


| (T' ST EQ 'F'). FTYPE | 


2 


J &TYPE 


|SETC 


!*£■ 1 


3 


| . FTYPE 


|ANOP 




4 


J 6NAME 


|STSTYPE 


| 2 , SAVEAREA | 






|L6TYPE 


|2,6F | 






| ST6TYPE 


|2,£T | 






ILSTYPE 


| 2, SAVEAREA | 






jMEND 






| — 


_JL 


_JL - J 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is not the letter F, 
statement 2 is the next statement processed 
by the assembler. If the type attribute is 
the letter F, statement 4 should be 
processed next. However, since there is a 
variable symbol (SNAME) in the name field 
of statement 4, the required sequence sym- 
bol (.FTYPE) cannot be placed in the name 
field. Therefore, an ANOP instruction 
(statement 3) must be placed before state- 
ment 4. 



ANOP — ASSEMBLY NO OPERATION 



The ANOP instruction facilitates condi- 
tional and unconditional branching to 
statements named by symbols or variable 
symbols. 



Then, if the type attribute of the first 

operand is the letter F, the next statement 

processed by the assembler is the statement 

named by sequence symbol .FTYPE. The value 

of 5TYPE retains its initial null character 
value because the SETC instruction is not 

processed. Since .FTYPE names an ANOP 



V.,^ 



84 



instruction, the next statement processed 
by the assembler is statement 4, the state- 
ment following the ANOP instruction. 



CONDITIONAL ASSEMBLY ELEMENTS 



The intersection of a column and a row 
indicates whether an element can be used in 
an instruction, and if so, in what fields 
of the instruction the element can be used. 
For example, the intersection of the first 
row and the first column of the chart indi- 
cates that symbolic parameters can be used 
in the operand field of SETA instructions. 



The following chart summarizes the elements 
that can be used in each conditional assem- 
bly instruction. Each row in this chart 
indicates which elements can be used in a 
single conditional assembly instruction. 
Each column is used to indicate the condi- 
tional assembly instructions in which a 
particular element can be used. 



S.P. 
SETA 



Variable Symbols 

Attributes 
SET Symbols 

SETA | SETB | SETC | T' | L* | S* | I 1 | K' | N f | S.S. 















N,0 



SETB 



N,0 



SETC 



AIF 



AGO 

ANOP 
ACTR 



j. l + 1. 







3 



N,0 



3 



0* 



O*- 



N,0 



02 



-J. JL- 



2 



2 



2 



o 2 






O 2 



— + i :H 



o 2 



O 2 



o 2 



N,0 



-J. J. X J 



1 Only in character relations 

2 Only in arithmetic relations 

3 only if one to eight decimal digits 

Abbreviations 

N is Name L' is Length Attribute K' is Count Attribute 

is Operand S* is Scaling Attribute N* is Number Attribute 

S.P. is Symbolic I* is Integer Attribute S.S. is Sequence Symbol 
Parameter 
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SECTION 10: ADDITIONAL FEATURES 



The additional features of the assembler 
language allow the programmer to: 

1. Terminate processing of a macro- 
definition. 

2. Generate error messages. 

3. Define global SET symbols. 

4. Define subscripted SET symbols. 

5. Use system variable symbols. 

6. Prepare keyword and mixed-mode macro- 
definitions and write keyword and 
mixed- mode macro-instructions. 






"T 



T 





| Name 


| Operation 
| MACRO 


| Operand 


1 

— ! 






| SNAME 


|MOVE 


|ST,6F 




1 




|AIF 


| (T'ST EQ *F').OK 




2 




|MEXIT 






3 


|.OK 


|ANOP 








| SNAME 


|ST 

|L 
JST 

|L 

JMEND 


| 2,SAVEAREA 
|2,6F 
|2,ST 
|2,SAVEAREA 






L - 


-A- - - 







MEXIT — MACRO-DEFINITION EXIT 



The MEXIT instruction is used to indicate 
to the assembler that it should terminate 
processing of a macro-definition. The 
typical form of this instruction is: 



JName 

^ — - 

| A sequence 
j symbol or 
| not used 



| Operation | Operand 



| MEXIT 



JNot used, 
| must not be 
| present 



—j 



Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, the 
assembler processes the remainder of the 
macro-definition starting with statement 3. 
If the type attribute is not the letter F, 
the next statement processed by the 
assembler is statement 2. Statement 2 
indicates to the assembler that it is to 
terminate processing of the macro- 
definition. 



MNOTE STATEMENT 



The MEXIT instruction may only be used 
in a macro-definition. 

If the assembler processes an MEXIT 
instruction that is in a macro-definition, 
corresponding to an outer macro- 
instruction, the next statement processed 
by the assembler is the next statement 
outside macro-definitions. 

If the assembler processes an MEXIT 
instruction that is in a macro- definition 
corresponding to a second or third level 
macro- instruction, the next statement proc- 
essed by the assembler is the next state- 
ment after the second or third level macro- 
instruction in the macro- definition, 
respectively. 

MEXIT should not be confused with MEND. 
MEND indicates the end of a macro- 
definition. MEND must be the last 
statement of every macro-definition, 
including those that contain one or more 
MEXIT instructions. 

The following example illustrates the 
use of the MEXIT instruction. 



The MNOTE instruction may be used to generate 
a message and to indicate what error severity 
code, if any, is to be associated with the 
message. The severity code is for the 
programmer's information only and is not 
used by the DOS assembler or control pro- 
gram. The typical form of this instruction 
is : 

| Name | Operation! Operand | 

|A sequence | MNOTE | See examples below, j 
j symbol or | j j 

j not used j j j 

The operand entry of the MNOTE 
assembler-instruction may be written in one 
of the following forms: 

1. severity- code, 'message' 

2. ,' message' 

3. 'message* 

For 2 and 3 above, the severity code is 
assumed to be one. 
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The MNOTE instruction may only be used 
in a macro definition. Variable symbols 
may be used to generate the MNOTE mnemonic 
operation code, the severity code indicator, 
and the message. 

The resulting severity code indicator 
may be a decimal integer to 255, blank, 
or an asterisk. The integers indicate the 
severity of the error. (0 is the least 
severe; 255 is the most severe) . If the 
severity code indicator is blank or omit- 
ted, 1 is assumed. If the severity code is 
an asterisk, the MNOTE is not considered an 
error message. Messages can be generated 
with substitution using variable symbols. 

The MNOTE statement appears in the list- 
ing with a statement number at the point 
where it was generated. It appears even if 
PRINT NOGEN is specified. If the severity 
code indicator was an integer or a blank, 
this statement number is placed in a list 
of statement numbers of MNOTE and other 
error statements near the end of the assem- 
bly listing. If the severity code is an 
asterisk, the statement number is not 
placed in this list. 

Since the message portion of the MNOTE 
operand is enclosed in apostrophes, two 
apostrophes must be used to represent a 
single apostrophe. Any variable symbols 
used in the message operand are replaced by 
values assigned to them. Two ampersands 
must be used to represent a single amper- 
sand that is not part of a variable symbol. 

The following example illustrates the 
use of the MNOTE instruction. 





i Name 

L _ 


Operation 


Operand 


1 




1 H 


r — ~ 
MACRO 


r ~ - " 


1 




1 &NAME 


MOVE 


&T,&F 




1 




AIF 


(T'&T NE T'&F) .Ml 




2 




AIF 


(T'&T NE 'F' ) .M2 




3 


&NAME 


ST 
L 
ST 
L 


2 , SAVEAREA 

2,&F 

2,&T 

2 , SAVEAREA 




4 




MNOTE 
MEXIT 


* , • MOVE GENERATED ' 




5 


• Ml 


MNOTE 
MEXIT 


8 , ' TYPE NOT SAME ' 




6 


,M2 


MNOTE 


8, 'TYPE NOT F' 






L_ _ 


MEND 




1 



Statement 1 is used to determine if the 
type attributes of both macro instruction 
operands are the same. If they are, state- 
ment 2 is the next statement processed by 
the assembler. If they are not, statement 
5 is the next statement processed by the 



assembler. Statement 5 causes an error 
message — 8, TYPE NOT SAME — to be printed 
in the source program listing. 

Statement 2 is used to determine if the 
type attribute of the first macro instruc- 
tion operand is the letter F. If the type 
attribute is the letter F, statement 3 is 
the next statement processed by the 
assembler. If the attribute is not the 
letter F, statement 6 is the next state- 
ment processed by the assembler. State- 
ment 6 causes an error message — 
8, TYPE NOT F — to be printed in the source 
program listing. Statement 4 is an MNOTE 
which is not treated as an error message. 



GLOBAL AND LOCAL VARIABLE SYMBOLS 



The following are local variable symbols: 

1. Symbolic parameters. 

2. Local SET symbols. 

3. System variable symbols. 

Global SET symbols are the only global 
variable symbols. 

The GBLA, GBLB, and GBLC instructions 
define global SET symbols, just as the 
LCLA, LCLB, and LCLC instructions define 
the SET symbols described in Section 9. 
Hereinafter, SET symbols defined by LCLA, 
LCLB, and LCLC instructions will be called 
local SET symbols. 

Global SET symbols may communicate 
values between statements in one or more 
macro definitions and statements outside 
macro definitions. However, local SET 
symbols communicate values between state- 
ments in the same macro definition, or 
between statements outside macro defini- 
tions . 

If a local SET symbol is defined in two 
or more macro definitions, or in a macro 
definition and outside macro definitions, 
the SET symbol is considered to be a 
different SET symbol in each case. How- 
ever, a global SET symbol is the same SET 
symbol each place it is defined. 

A SET symbol must be defined as a 
global SET symbol in each macro definition 
in which it is to be used as a global SET 
symbol. A SET symbol must be defined as a 
global SET symbol outside macro defini- 
tions, if it is to be used as a global 
SET symbol outside macro definitions. 

If the same SET symbol is defined as a 
global SET symbol in one or more places, 
and as a local SET symbol elsewhere, it is 
considered the same symbol wherever it is 
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defined as a global SET symbol, and a dif- 
ferent symbol wherever it is defined as as 
local SET symbol. 



Defining Local and Global SET Symbols 

Local SET symbols are defined when they 
appear in the operand entry of an LCLA, 
LCLB, or LCLC instruction. These instruc- 
tions are discussed in Section 9 under 
Defining SET Symbols. 

Global SET symbols are defined when 
they appear in the operand entry of a GBLA, 
GBLB, or GBLC instruction. The typical 
forms of these instructions are: 



1 — 




7 " ~ 1 


{ Name 


Operation 


i Operand i 


{ Not used, 


GBLA, 


| One or more [ 


j must not 


GBLB , or 


J variable i 


i be present 


GBLC 


i symbols that { 
j are to be used { 
j as global SET { 
i symbols , sepa- i 
! rated by commas J 



The GBLA, GBLB, and GBLC instructions 
define global SETA," SETB, and SETC symbols, 
respectively, and assign the same initial, 
values as the corresponding types of local 
SET symbols. However, a global SET symbol 
is assigned an initial value by only the 
first GBLA, GBLB, or GBLC instruction proc- 
essed in which the symbol appears . Subse- 
quent GBLA, GBLB, or GBLC instructions 
processed by the assembler do not affect 
the value assigned to the SET symbol. 

The programmer should not define any 
global SET symbols whose first four charac- 
ters are &SYS . 

If a GBLA, GBLB, or GBLC instruction 
is part of a macro definition, it must 
immediately follow the prototype statement, 
or another GBLA, GBLB, or GBLC instruction. 
GBLA, GBLB, and GBLC instructions outside 
macro definitions must appear after all 
macro definitions in the source program, 
before all conditional assembly instruc- 
tions and PUNCH and REPRO statements out- 
side macro definitions, and before the 
first control section of the program. 



All GBLA, GBLB, and GBLC instructions 
in a macro definition must appear before all 
LCLA, LCLB, and LCLC instructions in that 
macro definition. All GBLA, GBLB, and GBLC 
instructions outside macro definitions must 
appear before all LCLA, LCLB, and LCLC 
instructions outside macro definitions. 



U sing Global and Local SET Symbols 

The following examples illustrate the use 
of global and local SET symbols . Each 
example consists of two parts. The first 
part is an assembler language source pro- 
gram. The second part shows the statements 
that would be generated by the assembler 
after it processed the statements in the 
source program. 



Example 1 ; This example illustrates how 
the same SET symbol can be used to communi- 
cate (1) values between statements in the 
same macro definitions, and (2) different 
values between statements outside macro 
definitions . 



r r- r i 

J Name { Operation J Operand j 


l i MACRO j j 
! &NAME { LOADA [ j 
j " LCLA I &A i 
i &NAME ! LR J 15 , &A { 
[ &A [ SETA { &A+1 { 
{ { MEND J i 

{ ! LCLA ! &A { 

j FIRST { LOADA j I 

I i LR i 15, &A J 

{ J LOADA } { 

j { LR { 15, &A i 

i i END i FIRST ! 
i 1_ _ _ _ i _ _ I 


{ FIRST [ LR J 15,0 i 
i I LR i 15,0 ! 
j j LR | 15,0 J 
i i LR J 15,0 j 
I i END i FIRST i 
L_ ' __ _L _ 1 



&A is defined as a local SETA symbol in 
a macro definition (statement 1) and out- 
side macro definitions (statement 4) . 
&A is used twice within macro definition 
(statements 2 and 3) and twice outside 
macro definitions (statements 5 and 6) . 

Since &A is a local SETA symbol in the 
macro definition and outside macro defi- 
nitions , it is one SETA symbol in the macro 
definition, and another SETA symbol outside 
macro definitions. Therefore, statement 3 
(which is in the macro definition) does 
not affect the value used for &A in state- 
ments 5 and 6 (which are outside macro 
definitions) . 

Example 2 ; This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
a macro definition and statements outside 
macro definitions. 





| Name 
I 


| Operation 
| MACRO 


| Operand 
H 






|6NAME 


| LOADA 




1 




|GBLA 


|SA 


2 


| SNAME 


JLR 


|15,SA 


3 


|6A 


|SETA 
JMEND 


|SA+1 


4 




|GBLA 


|SA 




| FIRST 


| LOADA 




5 




|LR 

| LOADA 


|15,SA 


6 




|LR 


|15,SA 




I 

| FIRST 


|END 
|LR 


| FIRST 
115,0 








|LR 


|15,1 






|LR 


|15,1 






|LR 


|15,2 






|END 


| FIRST 




L_ 


L 


— L 



r 



SA is defined as a global SETA symbol in 
a macro-definition (statement 1) and out- 
side macro- definitions (statement 4) . SA 
is used twice within the macro-definition 
(statements 2 and 3) and twice outside 
macro-definitions (statements 5 and 6). 



Since SA is a global SETA symbol in the 
macro- definition and outside macro- 
definitions, it is the same SETA symbol in 
both cases. Therefore, statement 3 (which 
is in the macro-definition) affects the 
value used for SA in statements 5 and 6 
(which are outside macro-definitions). 



Example 3: This example illustrates how 
the same SET symbol can be used to 
communicate: (1) values between statements 
in one macro-def in it ion, and (2) different 
values between statements in a different 
ma cr o- def in i t i on . 



SA is defined as a local SETA symbol in 
two different macro-def init ions (statements 
1 and 4). SA is used twice within each 
macro-definition (statements 2,3,5 and 6). 

Since 6 A is a local SETA symbol in each 
macro-def in ition, it is one SETA symbol in 
one macro- def init ion, and another SETA 
symbol in the other macro-definition. 
Therefore, statement 3 (which is in one 
macro-def init ion) does not affect the value 
used for SA in statement 5 (which is in the 
other macro-definition). Similarly, state- 
ment 6 does not affect the value used for 
SA in statement 2. 



1 

1 




(Name 


| Operation 


| Operand 


^ 




1 

| SNAME 


| MACRO 
j LOADA 


"| 




1 




JLCLA 


| SA 




2 


| SNAME 


|LR 


| 15, SA 




3 


| SA 


j SETA 
JMEND 

| MACRO 
| LOADB 


JSA+1 




4 




JLCLA 


|SA 




5 




|LR 


|15,6A 




6 


| SA 


| SETA 
|MEND 


l&A+l 


i 




| FIRST 


| LOADA 
| LOADB 
j LOADA 
| LOADB 




j 




| FIRST 


|END 
|LR 


| FIRST 
|15,0 












|LR 


|15,0 








JLR 


|15,0 








|LR 


|15,0 


n 






jEND 


| FIRST 






Example 4; This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
two different macro-def ini t ions. 



j Name | Operation 







I MACRO 




SNAME 


| LOADA 


1 




|GBLA 


2 


SNAME 


|LR 


3 


SA 


|SETA 
JMEND 

| MACRO 
| LOADB 


4 
5 




|GBLA 
|LR 


6 


SA 


| SETA 
j MEND 




FIRST 


| LOADA 
| LOADB 
j LOADA 
j LOADB 
|END 




\ 


-I 




FIRST 


|LR 
JLR 
JLR 
JLR 
JEND 



L 
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SA is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4) . SA is used twice within each 
macro- definition (statements 2,3,5, and 6). 



Since 6 a is a global SETA symbol in each 
macro- definition, it is the same SETA sym- 
bol in each macro-definition. Therefore, 
statement 3 (which is in one 
macro-def inition) affects the value used 
for SA in statement 5 (which is in the 
other macro-definition). Similarly, state- 
ment 6 affects the value used for SA in 
statement 2. 



Example 5; This example illustrates how 
the same SET symbol can be used to communi- 
cate: (1) values between statements in two 
different macro-definitions, and (2) dif- 
ferent values between statements outside 
macro-def init ions. 





r - 
| Name 


j Operation | Opera] 




1 


| MACRO 


| 




| 6 NAME 


j LOADA 




1 




|GBLA 


SA 


2 


l&NAME 


|LR 


15, SA 


3 


| SA 


|SETA 
1 MEND 

1 MACRO 
| LOADB 


SA+1 


4 




JGBLA 


SA 


5 




|LR 


15, SA 


6 


|&A 


JSETA 
JMEND 


[SA+1 


7 




|LCLA 


SA 




| FIRST 


j LOADA 
j LOADB 




8 




|LR 

j LOADA 
j LOADB 


[15, SA 


9 




|LR 


|15,6A 




I 

| FIRST 


|END 
JLR 


(FIRST 

1 

|15,0 








|LR 


|15,1 






JLR 


|15,0 






|LR 


1 15, 2 






JLR 


[15,3 






|LR 


|15, 






|END 


| FIRST 




L— 


1 — __. 











SA is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4), but it is defined as a local SETA 
symbol outside macro-definitions (statement 
7). SA is used twice within each macro- 
definition and twice outside macro- 
definitions (statements 2,3,5,6,8, and 9). 



Since SA is a global SETA symbol in each 
macro-definition, it is the same SETA 
symbol in each macro-definition. However, 
since SA is a local SETA symbol outside 
macro-definitions, it is a different SETA 
symbol outside macro-definitions. 

Therefore, statement 3 (which is in one 
macro-definition) affects the value used 
for SA in statement 5 (which is in the 
other macro-definition), but it does not 
affect the value used for SA in statements 
8 and 9 (which are outside 

macro-definitions). Similarly, statement 6 
affects the value used for SA in statement 
2, but it does not affect the value used 
for SA in statements 8 and 9. 



Subscripted SET Symbols 



Both global and local SET symbols may be 
defined as subscripted SET symbols. The 
local SET symbols defined in Section 9 were 
all nonsubscripted SET symbols. 

Subscripted SET symbols provide the 
programmer with a convenient way to use one 
SET symbol plus a subscript to refer to 
many arithmetic, binary, or character 
values . 

A subscripted SET symbol consists of a 
SET symbol immediately followed by a sub- 
script that is enclosed in parentheses. 
The subscript may be any arithmetic expres- 
sion that is allowed in the operand of a 
SETA statement in the range of 1 to the 
specified dimension. 

Only five levels of parentheses are 
permitted in a SETA or SETB operand. 

The following are valid subscripted SET 
symbols. 

6READER(17) 

SA23U56(SS4) 

SX4F2(25+SA2) 

The following are invalid subscripted 
SET symbols. 



SX4F2 
(25) 
SX4F2 (25) 



(no subscript) 
(no SET symbol) 
(subscript does not 

immediately follow 

SET symbol) 



Defining Subscripted SET Symbols: If the 
programmer wants to use a subscripted SET 
symbol, he must write in a GBLA, GBLB, 
GBLC, LCLA, LCLB, or LCLC instruction, a 
SET symbol immediately followed by an 
unsigned decimal integer enclosed in paren- 
theses. The decimal integer, called a 
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dimension, indicates the number of SET 
variables associated with the SET symbol. 
Every variable associated with a SET symbol 
is assigned an initial value that is the 
same as the initial value assigned to the 
corresponding type of nonsubcripted SET 
symbol. 

If a subscripted SET symbol is defined 
as global, the same dimension must be used 
with the SET symbol each time it is defined 
as global. 

The maximum dimension that can be used 
with a SETA, SETB, or SETC symbol is 2 55. 

A subscripted SET symbol may be used 
only if the declaration was subscripted. A 
nonsubscripted SET symbol may be used only 
if the declaration had no subscript. 



The following statements define the 
global SET symbols SSBOX, 6WB0X, and SPSW, 
and the local SET symbol STSW. SSBOX has 
50 arithmetic variables associated with it, 
SWBOX has 20 character variables, SPSW and 
STSW each have 230 binary variables. 



| Name | Operation | Operand 

| |GBLA |6SBOX(50) 

| JGBLC | SWBOX (20) 

j |GBLB |SPSW(230) 

| jLCLB | STSW (230) 



1 

I 

I 

I 

I 

I 
J 



Using Subscripted SET Symbols: After the 
programmer has associated a number of SET 
variables with a SET symbol, he may assign 
values to each of the variables and use 
them in other statements. 

If the statements in the previous exam- 
ple were part of a macro-definition, (and 
SA was defined as a SETA symbol in the same 
definition) , the following statements could 
be part of the same macro- definition. 



I Name 

|SA | SETA 

|6PSW(SA) | SETB 

j STSW (9) | SETB 

I ICLI 



| Operat ion | Operand 



15 

| ( 6 LT 2) 

| (SPSW(SA)) 

|2,=F'SSBOXU5)' 

| AREA, C* SWBOX (17)' 



and STSW (9), respectively. Statements 4 
and 5 generate statements that add the 
value assigned to SSBOX (45) to general 
register 2, and compare the value assigned 
to 6WBOX(17) to the value stored at AREA, 
respectively. 



SYSTEM VARIABLE SYMBOLS 



System variable symbols are local variable 
symbols that are assigned values automat- 
ically by the assembler. There are three 
system variable symbols: SSYSNDX, SSYSECT, 
and SSYSLIST. System variable symbols may 
be used in the name, operation and operand 
entries of statements in macro-definitions, 
but not in statements outside macro- 
definitions. They may not be defined as 
symbolic parameters or SET symbols, nor may 
they be assigned values by SETA, SETB, and 
SETC instructions. 



SSYSNDX — Macro- Instruction Index 



The system variable symbol SSYSNDX may be 
combined with other characters to create 
unique names for statements generated from 
the same model statement. 



SSYSNDX is assigned the four-digit 
number 0001 for the first macro- instruction 
processed by the assembler, and it is 
incremented by one for each subsequent 
inner and outer macro- instruction proc- 
essed. 



If SSYSNDX is used in a model statement, 
SETC or MNOTE instruction, or a character 
relation in a SETB or AIF instruction, the 
value substituted for SSYSNDX is the four- 
digit number of the macro-instruction being 
processed, including leading zeros. 

If SSYSNDX appears in arithmetic 
expressions (e.g., in the operand of a SETA 
instruction), the value used for SSYSNDX is 
an arithmetic value. 

Throughout one use of a macro defini- 
tion, the value of SSYSNDX may be consid- 
ered a constant, independent of any inner 
macro-instruction in that definition. 



Statement 1 assigns the arithmetic value 
5 to the nonsubscripted SETA symbol SA. 
Statements 2 and 3 then assign the binary 
value to subscripted SETB symbols SPSW(5) 



The example in the next column illus- 
trates these rules. It is assumed that the 
first macro-instruction processed, OUTER 1, 
is the 106th macro- instruction processed by 
the assembler. 
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Statement 7 is the 106th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0106 for that macro- 
instruction. The number 0106 is 
substituted for SSYSNDX when it is used in 
statements 4 and 6. Statement 4 is used to 
assign the character value 0106 to the SETC 
symbol SNDXNUM. Statement 6 is used to 
create the unique name B0106. 

i t t T 

| Name | Operation 1 Operand | 



A SSYSNDX 



6 NAME 

SNDXNUM 
SNAME 



B SSYSNDX 

ALPHA 
BETA 

ALPHA 

A0107 



B0106 
BETA 

A0109 



B0108 



MACRO 

INNERl 

GBLC 

SR 

CR 

BE 

B 

MEND 

| MACRO 
| OUTERl 
I GBLC 

SETC 
|SR 
|AR 
| INNERl 

S 
| MEND 

-+ 

OUTERl 
OUTERl 

SR 
AR 
SR 
CR 
BE 
B 
S 

SR 
AR 
SR 
CR 
BE 
B 
S 
JL 



6NDXNUM 

2.5 

2,5 

B6NDXNUM 

A6SYSNDX 



SNDXNUM 
1 SSYSNDX 1 
2,4 
2,6 

2,=F , 1000' 
-I 



-H 



2,4 

2,6 

2,5 

2,5 

B0106 

A0107 

2,=F , 1000 f 

2,4 

2,6 

2,5 

2,5 

B0108 

A0109 

2,=F , 1000» 



When statement 5 is used to process the 
108th macro-instruction, statement 5 
becomes the 109th macro- instruct ion proc- 
essed. Therefore, each occurrence of 
SSYSNDX is replaced by the number 0109. 
For example, statement 1 is used to create 
the unique name A0109. 



6SYSECT — Current Control Section 



The system variable symbol SSYSECT may be 
used to represent the name of the control 
section in which a macro-instruction 
appears. For each inner and outer macro- 
instruction processed by the assembler, 
SSYSECT is assigned a value that is the 
name of the control section in which the 
macro-instruction appears. 

When SSYSECT is used in a macro- 
definition, the value substituted for 
SSYSECT is the name of the last CSECT, 
DSECT, or START statement that occurs 
before the macro- instruction. If no named 
CSECT, DSECT, or START statements occur 
before a macro- instruction, SSYSECT is 
assigned a null character value for that 
macro- instruction. 

CSECT or DSECT statements processed in a 
macro-definition affect the value for 
SSYSECT for any subsequent inner macro- 
instructions in that definition, and for 
any other outer and inner macro- 
instructions. 



Throughout the use of a macro- 
definition, the value of SSYSECT may be 
considered a constant, independent of any 
CSECT or DSECT statements or inner macro- 
instructions in that definition. SSYSECT 
will take on the name of the last CSECT, 
DSECT, or START statement regardless of 
whether or not that statement is correct. 

The next example illustrates these 
rules. 



Statement 5 is the 107th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0107 for that macro- 
instruction. The number 0107 is 
substituted for SSYSNDX when it is used in 
statements 1 and 3. The number 0106 is 
substituted for the global SETC symbol 
SNDXNUM in statement 2. 



Statement 8 is the 108th macro- 
instruction processed. Therefore, each 
occurrence of SSYSNDX is replaced by the 
number 0108. For example, statement 6 is 
used to create the unique name B0108. 



Statement 8 is the last CSECT, DSECT, or 
START statement processed before statement 
9 is processed. Therefore, SSYSECT is 
assigned the value MAINPROG for macro- 
instruction OUTERl in statement 9. 
MAINPROG is substituted for SSYSECT when it 
appears in statement 6. 



Statement 3 is the last CSECT, DSECT, or 
START statement processed before statement 
4 is processed. Therefore, SSYSECT is 
assigned the value CSOUT1 for macro- 
instruction INNER in statement 4. CSOUT1 
is substituted for SSYSECT when it appears 
in statement 2. 
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Statement 1 is used to generate a CSECT 
statement for statement 4. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 5. Therefore, 
SSYSECT is assigned the value INA for 
macro instruction INNER in statement 5. 
INA is substituted for &SYSECT when it 
appears in statement 2. 





r~" 


" T~ - 


T 


1 




| Name 


| Operation 
| MACRO 


| Operand 


1 
1 








j INNER 


| 6INCSECT 




1 


| 6INCSECT 


| CSECT 






2 




|DC 
|MEND 

| MACRO 
JOUTERI 


|A(&SYSECT) 




3 


| CS0UT1 


| CSECT 
|DS 


|100C 




4 




| INNER 


|INA 




5 




j INNER 


JINB 




6 




|DC 

j MEND 

| MACRO 
|OUTER2 


|A( SSYSECT) 




7 


j. 


J DC 
|MEND 


|A(&SYSECT) 

_i 


j 




1 


1 


8 


| MAINPROG 


| CSECT 
|DS 


|2 00C 




9 




|0 UTERI 






10 


| MAINPROG 


JOUTER2 
| CSECT 


— + 


-i 








|DS 


|200C 






| CSOUT1 


| CSECT 
|DS 


|100C 






| INA 


j CSECT 
|DC 


|A(CSOUTl) 






| INB 


j CSECT 

|DC 

|DC 


| A (INA) 

j A (MAINPROG) 








|DC 


|A(INB) 


J 



r' 



Statement 1 is used to generate a CSECT 
statement for statement 5. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 10. Therefore, 
SSYSECT is assigned the value INB for 
macro instruction OUTER2 in statement 10. 
INB is substituted for SSYSECT when it 
appears in statement 7. 



&SYSLIST - Accessing Positional Operands in 
a Macro Instruction 

The system variable symbol &SYSLIST pro- 
vides the programmer with an alternative to 
symbolic parameters for referring to pos- 
itional macro instruction operands. 



&SYSLIST may be coded, along with all 
other variable symbols (including symbolic 
parameters) , in the model statements of any 
macro definition. (In the Tape Operating 
System (TOS) , &SYSLIST cannot be used in 
macro definitions having any keyword sym- 
bolic parameters) . When used to access a 
macro instruction operand, &SYSLIST is 
written with one or two subscripts: 

1. &SYSLIST(m) will access the positional 
macro instruction operand corresponding 
to the positional operand subscript m. 
The programmer, therefore, does not have 
to define a positional parameter in the 
macro definition prototype statement. 
This allows him to access a different 
number of positional macro instruction 
operands in different calls to the same 
macro. The positional operand subscript 
m can be a self-defining term or an abso- 
lute expression, but its value must be 
a positive, whole number within the 
range of the number of operands permit- 
ted in a macro instruction. 

Note ; A null string will be generated 
in place of &SYSLIST(m) if: 

a. m=0 

b. m is greater than the number of pos- 
itional operands in the macro 
instruction. 

c. m accesses a specifically omitted 
operand. 

The model statement containing 
&SYSLIST(m) will be flagged in error if: 

a. m is negative. 

b. m is greater than 100 (for the 
D Assembler) . 

m is greater than 200 (for the 
F Assembler) . 

2. &SYSLIST (m,n) accesses elements of pos- 
itional operand sublists in macro 
instructions. The positional operand 
subsript m fulfills the same function 
as above, and is subjected to the same . 
restrictions. The positional operand 
sublist subscript n refers to the sub- 
list element of the positional operand 
in a macro instruction corresponding to 
m. Again positional parameters need 
not have been previously defined in the 
macro definition prototype statement. 

Note : A null string will be generated 
in place of &SYSLIST (m,n) , m > and 
otherwise within its allowable range, 
if: 
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a. n=0 

b. n is greater than the number of ele- 
ments in the positional operand sub- 
list in the macro instruction. 

c. n accesses a specifically omitted 
operand sublist element. 

The type, length, scaling, integer, and 
count attributes of &SYSLIST(m) and 
&SYSLIST (m,n) and the number attributes of 
&SYSLIST (m) and &SYSLIST may be used in con- 
ditional assembly instructions. Attributes 
are discussed in Section 9 under Attributes . 

N*&SYSLIST refers to the total number of 
positional operands in the macro instruction 
statement. When none have been called, 
N'&SYSLIST has the value 0. If, however, 
some positional operands in the macro 
instruction are specifically omitted (by 
means of commas), N'&SYSLIST will include 
the omitted operands in its count (see 
MAC2 and MAC3 in the examples below) . A 
sublist is considered to be one operand 
(see MAC3 below) : 



Macro Instructions 


N' 6 SYS LIST 


MAC1 K1=DS 

MAC2 ,,K1=DC 

MAC3 FULL,,F, ('!' , '2' ,'3') ,Kl=DC 



2 

4 



N'&SYSLIST(m) refers to the total num- 
ber of elements in the macro instruction 
operand sublist corresponding to the pos- 
itional operand subscript m. If the mth 
operand is omitted, N 1 &SYSLIST (m) is 0; if 
the mth operand is not a sublist, 
N'&SYSLIST(m) is 1. 

In the MAC3 macro instruction above: 

N'&SYSLIST (4) is 3 

N'&SYSLIST (5) is 

N'&SYSLIST(2) is 

N'&SYSLIST (1) is 1 

KEYWORD MACRO DEFINITIONS AND INSTRUCTIONS 



Keyword macro definitions provide the pro- 
grammer with an alternate way of preparing 
macro definitions. 

A keyword macro definition enables a 
programmer to reduce the number of operands 
in each macro instruction that corresponds 
to the definition, and to write the oper- 
ands in any order. 

The macro instructions that correspond 
to the macro definitions described in Sec- 
tion 7 (hereinafter called positional 
macro instructions and positional macro 
definitions, respectively) require the 
operands to be written in the same order as 
the corresponding symbolic parameters in 
the operand entry of the prototype 
statement. 
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In a keyword macro definition, the pro- 
grammer can assign values to any symbolic 
parameters that appear in the operand of 
the prototype statement. The value 
assigned to a symbolic parameter is substi- 
tuted for the symbolic parameter, if the 
programmer does not write anything in the 
operand of the macro instruction to corres- 
pond to the symbolic parameter. 

When a keyword macro instruction is 
written, the programmer need only write one 
operand for each symbolic parameter whose 
value he wants to change. 

Keyword macro definitions are prepared 
the same way as positional macro 
definitions, except that the prototype 
statement is written differently, and 
6SYSLIST may not be used in the definition. 
The rules for preparing positional macro 
definitions are in Section 7. 



type operands. 

CARD ARE A 
6TYPE 
STWO =123 



SAREA= X , 189A* 



(no symbolic parameter) 
(no equal sign) 
(equal sign does not 

immediately follow 

symbolic parameter) 
( value does 

not immediately follow 

equal sign) 



The following keyword prototype state- 
ment contains a symbolic parameter in the 
name entry and four operand entries in the 
operand. The first two operand entries 
contain values. The mnemonic operation 
code is MOVE. 



r t t 

|Name (Operation | Operand 



j 6N | MOVE 



| &R=2,SA=S, &T=,£F= j 



Keyword Prototype 



Keyword Macro Instruction 



The typical form of this statement is: 



| Name j Operation 



| A symbolic 
| parameter 
j or not used 



A symbol 



-t 1 

| Operand | 

|One to 100 (200 
j for F assembler) 
j operands of the 
| form described 
I below, separ- 
I ated by commas . 



JL- 



Each operand must consist of a symbolic 
parameter, immediately followed by an equal 
sign and optionally followed by a value. 
Nested keywords are not permitted. 

A value that is part of an operand must 
immediately follow the equal sign. 

Anything that may be used as an operand 
in a macro instruction except variable 
symbols, may be used as a value in a 
keyword prototype statement. The rules for 
forming valid macro instruction operands 
are detailed in Section 8. 



After a programmer has prepared a keyword 
macro definition he may use it by writing a 
keyword macro instruction. 

The typical form of a keyword macro 
instruction is: 



| Name | Operation! Operand | 

|A symbol, j Mnemonic j Zero to 100 operands | 
j sequence | operation! (200 for F assembler) j 
| symbol, or | code j of the form described! 
j not used j j below, separated by j 
| j j commas j 

Each operand consists of a keyword 
immediately followed by an equal sign and 
an optional value. Nested keywords are not 
permitted. Anything that may be used as an 
operand in a positional macro instruction 
may be used as a value in a keyword macro 
instruction. The rules for forming valid 
positional macro instruction operands are 
detailed in Section 8. 



The following are valid keyword proto- 
type operands. 

6READER= 
&LOOP2=SYMBOL 
6S4==F* 4096* 



The following are invalid keyword proto- 



A keyword consists of one through seven 
letters and digits, the first of which must 
be a letter. 

The keyword part of each keyword macro 
instruction operand must correspond to one 
of the symbolic parameters that appears in 
the operand of the keyword prototype 
statement. A keyword corresponds to a 
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symbolic parameter if the characters of the 
keyword are identical to the characters of 
the symbolic parameter that follow the 
ampersand. 

The following are valid keyword macro 
instruction operands. 

L00P2=SYMB0L 

S4=F•li096• 

TO= 

The following are invalid keyword macro 
instruction operands. 



SX4F2=0(2,3) 



CARDAREA=A+2 



(TO (8), (FROM)) 



(keyword does not begin 

with a letter) 
(keyword is more than 

seven characters) 
(no keyword) 



The operands in a keyword macro 
instruction may be written in any order. 
If an operand appeared in a keyword 
prototype statement, a corresponding oper- 
and does not have to appear in the keyword 
macro instruction. If an operand is omit- 
ted, the comma that would have separated it 
from the next operand need not be written. 

The following rules are used to replace 
the symbolic parameters in the statements 
of a keyword macro definition. 

1. If a symbolic parameter appears in the 
name entry of the prototype statement, 
and the name entry of the macro 
instruction contains a symbol, the 
symbolic parameter is replaced by the 
symbol. If the name entry of the 
macro instruction is unused or contains 
a sequence symbol, the symbolic param- 
eter is replaced by a null character 
value. 

2. If a symbolic parameter appears in the 
operand of the prototype statement, and 
the macro instruction contains a key- 
word that corresponds to the symbolic 
parameter, the value assigned to the 
keyword replaces the symbolic paramet- 
er. 

3. If a symbolic parameter was assigned a 
value by a prototype statement, and the 
macro instruction does not contain a 
keyword that corresponds to the symbol- 
ic parameter, the standard value 
assigned to the symbolic parameter 
replaces the symbolic parameter, oth- 
erwise, the symbolic parameter is 
replaced by a null character value. 

Note; If a symbolic parameter value is a 
self-defining term the type attribute 
assigned to the value is the letter N. If 
a symbolic parameter value is omitted the 
type attribute assigned to the value is the 



letter 0. All other values are assigned 
the type attribute U. 

The following keyword macro definition, 
keyword macro instruction, and generated 
statements illustrate these rules. 

Statement 1 assigns the values 2 and S 
to the symbolic parameters SR and SA, res- 
pectively. Statement 6 assigns the values 
FA, FB, and THERE to the keywords T, F, and 
A, respectively. The symbol HERE is used 
in the name entry of statement 6. 

Since a symbolic parameter (SN) appears 
in the name entry of the prototype state- 
ment (statement 1) , and the corresponding 
characters (HERE) of the macro instruction 
(statement 6) are a symbol, SN is replaced 
by HERE in statement 2. 













| Name 
\- 


| Operation 
| MACRO 


| Operand | 




1 


| SN 


JMOVE 


1 6R=2,SA=S,6T=,SF= | 


2 


| SN 


JST 


|SR,SA | 


3 




|L 


j SR , SF | 


4 




|ST 


|SR,ST j 


5 




|L 


| SR , SA | 




v 

JHERE 

\- 

|HERE 


JMEND 
|MOVE 
|ST 


| T=FA, F=FB, A=THERE | 
| 2 , THERE | 


6 








|L 


|2,FB | 






|ST 


| 2 , FA | 






|L 


| 2, THERE | 











Since ST appears in the operand of 
statement 1, and statement 6 contains the 
keyword (T) that corresponds to ST, the 
value assigned to T (FA) replaces ST in 
statement 4. Similarly, FB and THERE 
replace SF and SA in statement 3 and in 
statements 2 and 5, respectively. Note 
that the value assigned to SA in statement 
6 is used instead of the value assigned to 
SA in statement 1. 

Since SR appears in the operand of 
statement 1, and statement 6 does not con- 
tain a corresponding keyword, the value 
assigned to SR (2), replaces SR in state- 
ments 2, 3, 4, and 5. 



Operand Sublists; The value assigned to a 
keyword and the value assigned to a symbol- 
ic parameter may be an operand sublist. 
Anything that may be used as an operand 
sublist in a positional macro instruction 
may be used as a value in a keyword macro 
instruction and as a value in a keyword 
prototype statement. The rules for forming 
valid operand sublists are detailed in 
Section 8 under "Operand Sublists. " 
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Keyword Inner Macro Instructions: Keyword 
and positional inner macro instructions may 
be used as model statements in either 
keyword or positional macro definitions. 



Mixed-Mode Macro Instruction 



The typical form of a mixed-mode macro 
instruction is: 



MIXED- MODE MACRO DEFINITIONS AND 
INSTRUCTIONS 



Mixed-mode macro definitions allow the 
programmer to use the features of keyword 
and positional macro definitions in the 
same macro definition. 



Mixed- mode macro definitions are pre- 
pared the same way as positional macro 
definitions, except that the prototype 
statement is written differently. (In TOS 
6SYSLIST may not be used in the definition) 
The rules for preparing positional macro 
definitions are in Section 7. 



Mixed- Mode Prototype 



The typical form of this statement is; 



| Name | Operation | Operand | 

;7 7~77 17 7~7 iTwo~to 100 7 200 • 

I A symbolxc |A symbol i-«-™^ ^ \^ 



parameter | 
or not used j 



L_. 



for F assembler) 

operands of the 

1 form described 

{below, separated 

_ i^y commas ' 



The operands must be valid operands of 
positional and keyword prototype 
statements. All the positional operands 
must precede the first keyword operand. 
The rules for forming positional operands 
are discussed in Section 7 under Macro 
Instruction Prototype . The rules for 
forming keyword operands are discussed 
under Keyword Prototype . 

The following sample mixed-mode proto- 
type statement contains three positional 
operands and two keyword operands. 



I Name | Operation | Operand | 

|&N j MOVE J STY, SP, 6R, 6T0=, SF= | 



1 t r 1 

I Name | Operation! Operand | 

|A symbol, I Mnemonic | Zero to 100 (200 for | 
(sequence j operation |F assembler) operands | 
j symbol , or j code j of the form described! 
I not used j | below, separated by j 

j I J commas j 

L J 1 J 



The operand consists of two parts. The 
first part corresponds to the positional 
prototype operands. This part of the 
operand is written in the same way that the 
operand entry of a positional macro 
instruction is written. The rules for 
writing positional macro instructions are 
in Section 8 . 

The second part of the operand 
corresponds to the keyword prototype oper- 
ands- This part of the operand is written 
in the same way that the operand entry of a 
keyword macro instruction is written. The 
rules for writing keyword macro 
instructions are described under Keyword 
Macro Instruction . 

The following mixed-mode macro 
definition, mixed-mode macro instruction, 
and generated statements illustrate these 
facilities. 



] Name |Operation| 

j. x x~ 

I I MACRO I 

I 6N j MOVE j 

j 6N JST6TY I 

I JLSTY j 

j JSTSTY I 

I IL6TY I 



Operand 



6TY,gP,6R,6TO=,&F= 

SR,SAVE 

6R,SP6F 

SR,6P£T0 

SR,SAVE 



|HERE |MOVE | H, ,2 , F=FB,TO=FA 

I HERE )STH I 2, SAVE 

j |LH I 2,FB 

j JSTH j 2, FA 

I |LH j 2, SAVE 

I x X 



The prototype statement (statement 1) 
contains three positional operands (6TY,6P, 
and SR) and two keyword operands (STO and 
SF) . In the macro instruction (statement 
2) the positional operands are written in 
the same order as the positional operands 
in the prototype statement (the second 
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operand is omitted) . The keyword operands 
are written in an order that is different 
from the order of keyword operands in the 
prototype statement. 

Mixed-mode inner macro-instructions may 
be used as model statements in mixed- mode, 
keyword, and positional macro- definitions. 
Keyword and positional inner macro- 
instructions may be used as model 
statements in mixed-mode macro- definitions. 



symbols are declared in an appropriate LCLA, 
LCLB, LCLC, GBLA, GBLB , or GBLC statement. 
The AIFB and AGOB instructions are process- 
ed by the DOS/TOS Assembler the same way that 
the AIF and AGO instructions are processed. 
AIFB and AGOB instructions cause the count 
set up by the ACTR instruction to be decre- 
mented exactly like the AGO and AIF in- 
structions. 



CONDITIONAL ASSEMBLY COMPATIBILITY 



Macro- definitions prepared for use with the 
other System/360 assemblers having macro 
language facilities may be used with the 

DOS/TOS Assembler provided that all SET 



Additional Features 
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APPENDIX A: EXTENDED BINARY CODED DECIMAL INTERCHANGE CODE (EBCDIC) 



The following charts and the associated key 
show the bit configurations of the 256 
possible codes (characters) of the Extended 
BCD Interchange Code. To write a given 
character in binary, locate the character 
on the chart. The top row of coordinates 
equates to bit positions and l f the sec- 
ond row to bit positions 2 and 3, and the 
left row of coordinates equates to bit 
positions 4, 5, 6 and 7. 

Examples ; 

Character A equals: 

top row - 11 (bit positions 0, 1) 

2nd row - 00 (bit positions 2, 3) 

left row - 0001 (bit positions U, 5, 6 
and 7) 

Therefore, character A is shown as: 1100 
0001. 

Character $ equals: 

top row - 01 (bit positions 0, 1) 

2nd row - 01 (bit positions 2, 3) 

left row - 1011 (bit positions 4, 5, 6 
and 7) 



Therefore, character $ is shown as: 
0101 1011. 



The coordinates on the bottom of the 
chart are the three zone punches required 
to reproduce the character in a punched 
card; the coordinates on the right side 
represent the numeric punches. 



Examples : 



Character A = bottom row - 12 punch 
right row - 1 punch 

Therefore, Character A is shown by a 12 
and a 1 punch in the same card column. 



Character $ = bottom row - 11 punch 

right row - 8 and 3 punches 

Therefore, Character $ is shown by 11, 
8, and 3 punches in the same card column. 

There are fifteen exceptions to the 
punching equated to bit positions. These 
exceptions are shown in the chart by cir- 
cled numbers 1 through 15, and the substi- 
tuted punching is shown below the chart 
under Exceptions. 
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0000 



0001 



0010 



0011 



0101 



0110 



0111 



1000 



1001 



1010 



1011 



1100 



1101 



1110 



















Bit Positions 


ug 


Ul 


0, 1 


00 


01 


10 


11 


00 


01 


10 


11 


Bit Positions 


2, 3 



^ 


~®l 


$ 


tt 


sr^ 




(L 


& 


III 






SOS 








M 




'i 






FS 












v.- . i 

2i 


















31 


PF 


RES 


BYP 


PN 










4 


HT 


NL 


LF 


RS 










'' \ 
5 


LC 


BS 


EOB 


UC 










' " : 6i 


DEL 


IL 


PRE 


EOT 










7- 


















8; 










9'i 
12 


9 

11 


IS 




.x9 


9 
12. 




12 
11 


w, 

11 




9 

12 

11 






.one Punche 






* 










■ 





s J 





flft 






ni 




Bit Positions 






0, 1 


00 


01 


10 


11 


00 


01 


10 


11 


Bit Positions 


2,3 



















$-l! 






SM 




< 


! 


<d 




; 8~2f 












$ 


r 


# 


-1 

i-3 1 










< 


* 


'% 


@ 


8-4; 










( 


) 


_ 


1 


•8-5I 










+ 




> 


= 


8-6 










1 


, 


? 


"■ 


**$ 


















9 
12 


9 

11 


? 






12 




Hit 
ii 


ill!! 









one Punche 





















0000 



0010 



0011 



0101 



0110 



0111 



1001 



















Bit Positions 






0, 1 


00 


01 


10 


11 


00 


01 


10 


11 


Bit Positions 


' 2, 3 











(!) 


(15! (li 


^ 


a ±i 


a 


i 






A 


J 







t ' 


b 


k 


s 




B 


K 


s 


2 


' 21 


c 


l 


t 




C 


L 


T 


3 


3! 


d 


m 


u 




D 


M 


U 


4 


4 


e 


n 


V 




E 


N 


V 


5 


J. 


f 





w 




F 


O 


w 


6 


6 


g 


P 


X 




G 


P 


X 


7 


' 1 
7! 


h 


q 


y 




H 


O 


Y 


8 


8, 


i 


r 


z 




1 


R 


z 


9 


1 
9 , 



12 


12 




12 


12 










11 


11 


It 




11 





















S'01 










lone Punche 































Bit Positions 






0, 1 


00 


01 


10 


11 


00 


01 


10 


11 


Bit Positions 


2,3 



1010 












| 




-1 
3-2 


1011 


















3-3 


1100 


















8-4 


1101 












! 




3-5 


1110 
















8-6 


1111 


















$-?! 
























12 



12 

11 


11 




12 

11 

^0 


W>1 

12 



9 

12 


9 

11 



r 9'. 
12 

„n 









£one Punche 























12-0-9-8-1 

12-11-9-8-1 

(3) 11-0-9-8-1 

12-11-0-9-8-1 



No Punches 
12 

(?) 12-11-0 



12-0 

11-0 

0-8-2 





0-1 
11-0-9-1 
12-11 
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Control Characters 










PF 


Punch Off 


BS Backspace 




PN Punch On 




HT 


horizontal Tab 


IL Idle 




RS Reader Stop 




LC 


.ower Case 


BY Bypass 




UC Upper Case 




DL 


Delete 


LF Line Feed 




ET End of Transmission 




RE 


Restore 


EB End of Block 




SM Set Mode 




NL 


^Jew Line 


PR Prefix 




SP Space 




DS 1 


Digit Select 


SOS Start of Signif 


icance 


FS Field Separator 




Specia 


1 Graphic Characters 








<? 


Cent S 


ign * 


' Asterisk 


> 


Greater-than Sign 


• 


Period 


, Decimal Point 


1 Right Parenthesis 


? 


Question Mark 


< 


Less-than Sign 


r Semicolon 




Colon 


( 


Left Parenthesis ~ ■ Logical NOT 


# 


Number Sign 


+ 


Plus Si 


gn 


• Minus Sign, Hyphen 


@ 


At Sign 


1 


Vertical Bar, Logical OR / Slash 


■ 


Prime, Apostrophe 


& 


Amper 


sand 


' Comma 


= 


Equal Sign 


! 


Exclamation Point % Percent 


ii 


Quotation Mark 


$ 


Dollar 


Sign 


Underscore 












Bit Pattern 






Hole Pattern 


Examples 


Type 


Bit Positions 






















01 23 4567 




Zone Punches 


Digit Punches 


PF 


Control Character 


00 00 0100 


12-9-4 


% 


Special Graphic 


01 10 1100 


0- 


-8-4 


R 


Upper Case 


11 01 1001 


11 ■ 


-9 


a 


Lower Case 


10 00 0001 


12-0- 


- 1 






Control Character, 


00 1 1 0000 




12- 11 - 


-9- 


-8-1 






function not yet 
















assigned 








1 



r 
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APPENDIX B: HEXADECIMAL-DECIMAL NUMBER CONVERSION TABLE 



The table in this appendix provides for 
direct conversion of decimal and hexadeci- 
mal numbers in these ranges: 

| Hexadecimal J Decimal J 

| 000 to FFF | 0000 to 4095 | 

Decimal numbers (0000-4095) are given with- 
in the 5- part table. The first two charac- 
ters (high-order) of hexadecimal numbers 
(000-FFF) are given in the lefthand column 
of the table; the third character (x) is 
arranged across the top of each part of the 
table. 

To find the decimal equivalent of the 
hexadecimal number 0C9, look for 0C in the 
left column, and across that row under the 
column for x = 9. The decimal number is 
0201. 

To convert from decimal to hexadecimal, 
look up the decimal number within the table 
and read the hexadecimal number by a combi- 
nation of the hex characters in the left 
column, and the value for x at the top of 
the column containing the decimal number. 



For example, the decimal number 123 has the 
hexadecimal equivalent of 07B; the decimal 
number 1478 has the hexadecimal equivalent 
of 5C6. 

For numbers outside the range of the 
table, add the following values to the 
table 











I Hexadecimal 
| 1000 


1 
-+- 


Decimal 


1 

H 


4096 


| 2000 




8192 




| 3000 




12288 




| 4000 




16384 




1 5000 




20480 




| 6000 




24576 




| 7000 




28672 




1 8000 




32768 




| 9000 




36864 




| A000 




40960 




| B000 




45056 




| COOO 




49152 




| D000 




53248 




| E000 




57344 




| F000 




61440 




1 ■ ii iii ■ 


-JL_ 


. _ m ii- - 1 m 


-j 
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x = 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


OOx 


OOOO 


0001 


0002 


0003 


0004 


0005 


0006 


0007 


0008 


0009 


0010 


0011 


0012 


0013 


0014 


0015 


01x 


0016 


0017 


0018 


0019 


0020 


0021 


0022 


0023 


0024 


0025 


0026 


0027 


0028 


0029 


0030 


0031 


02x 


0032 


0033 


0034 


0035 


0036 


0037 


0038 


0039 


0040 


0041 


0042 


0043 


0044 


0045 


0046 


0047 


03x 


00U8 


0049 


0050 


0051 


0052 


0053 


0054 


0055 


0056 


0057 


0058 


0059 


0060 


0061 


0062 


0063 


04x 


0064 


0065 


0066 


0067 


0068 


0069 


0070 


0071 


0072 


0073 


0074 


0075 


0076 


0077 


0078 


0079 


05x 


0080 


0081 


0082 


0083 


0084 


0085 


0086 


0087 


0088 


0089 


0090 


0091 


0092 


0093 


0094 


0095 


06x 


0096 


0097 


0098 


0099 


0100 


0101 


0102 


0103 


0104 


0105 


0106 


0107 


0108 


0109 


0110 


0111 


07x 


0112 


0113 


0114 


0115 


0116 


0117 


0118 


0119 


0120 


0121 


0122 


0123 


0124 


0125 


0126 


0127 


08x 


0128 


0129 


0130 


0131 


0132 


0133 


0134 


0135 


0136 


0137 


0138 


0139 


0140 


0141 


0142 


0143 


09x 


0140 


0145 


0146 


0147 


0148 


0149 


0150 


0151 


0152 


0153 


0154 


0155 


0156 


0157 


0158 


0159 


OAx 


0160 


0161 


0162 


0163 


0164 


0165 


0166 


0167 


0168 


0169 


0170 


0171 


0172 


0173 


0174 


0175 


OBx 


0176 


0177 


0178 


0179 


0180 


0181 


0182 


0183 


0184 


0185 


0186 


0187 


0188 


0189 


0190 


0191 


OCx 


0192 


0193 


0194 


0195 


0196 


0197 


0198 


0199 


0200 


0201 


0202 


0203 


0204 


0205 


0206 


0207 


ODx 


0208 


0209 


0210 


0211 


0212 


0213 


0214 


0215 


0216 


0217 


0218 


0219 


0220 


0221 


0222 


0223 


OEx 


0221 


0225 


0226 


0227 


0228 


0229 


0230 


0231 


0232 


0233 


0234 


0235 


0236 


0237 


0238 


0239 


OFx 


0240 


0241 


0242 


0243 


0244 


0245 


0246 


0247 


0248 


0249 


0250 


0251 


0252 


0253 


0254 


0255 


10x 


0256 


0257 


0258 


0259 


0260 


0261 


0262 


0263 


0264 


0265 


0266 


0267 


0268 


0269 


0270 


0271 


11x 


0272 


0273 


0274 


0275 


0276 


0277 


0278 


0279 


0280 


0281 


0282 


0283 


0284 


0285 


0286 


0287 


12x 


0288 


0289 


0290 


02 91 


0292 


0293 


0294 


0295 


0296 


0297 


0298 


0299 


0300 


0301 


03 02 


0303 


13x 


0304 


0305 


0306 


0307 


0308 


0309 


0310 


0311 


0312 


0313 


0314 


0315 


0316 


0317 


0318 


0319 


14x 


0320 


0321 


0322 


0323 


0324 


0325 


0326 


0327 


0328 


0329 


0330 


0331 


0332 


0333 


0334 


0335 


15x 


0336 


0337 


0338 


0339 


0340 


0341 


0342 


0343 


0344 


0345 


0346 


0347 


0348 


0349 


0350 


0351 


16x 


0352 


0353 


0354 


0355 


0356 


0357 


0358 


0359 


0360 


0361 


0362 


0363 


0364 


0365 


0366 


0367 


17x 


0368 


0369 


0370 


0371 


0372 


0373 


0374 


0375 


0376 


0377 


0378 


0379 


0380 


0381 


0382 


0383 


18x 


0384 


0385 


0386 


0387 


0388 


0389 


0390 


0391 


0392 


0393 


0394 


0395 


0396 


0397 


0398 


0399 


19x 


0400 


0401 


0402 


04D3 


0404 


0405 


0406 


0407 


0408 


0409 


0410 


0411 


0412 


0413 


0414 


0415 


1Ax 


0416 


0417 


0418 


041? 


0420 


0421 


0422 


0423 


0424 


0425 


0426 


0427 


0428 


C429 


0430 


0431 


1Bx 


0432 


0433 


0434 


0435 


0436 


0437 


0438 


0439 


0440 


0441 


0442 


0443 


0444 


0445 


0446 


0447 


1Cx 


0448 


0449 


0450 


0451 


0452 


0453 


0454 


0455 


0456 


0457 


0458 


0459 


0460 


0461 


0462 


0463 


1Dx 


0464 


0465 


0466 


04 67 


0468 


0469 


0470 


0471 


0472 


0473 


0474 


0475 


0476 


0477 


0478 


0479 


1Ex 


0480 


0481 


0482 


0483 


0484 


0485 


0486 


0487 


0488 


0489 


0490 


0491 


0492 


0493 


0494 


0495 


1Fx 


0496 


0497 


0498 


0499 


0500 


0501 


0502 


0503 


0504 


0505 


0506 


0507 


0508 


0509 


0510 


0511 


20x 


0512 


0513 


0514 


0515 


0516 


0517 


0518 


0519 


0520 


0521 


0522 


0523 


0524 


0525 


0526 


0527 


21x 


0528 


0529 


0530 


0531 


0532 


0533 


0534 


0535 


0536 


0537 


0538 


0539 


0540 


0541 


0542 


0543 


22x 


0544 


0545 


0546 


0547 


0548 


0549 


0550 


0551 


0552 


0553 


0554 


0555 


0556 


0557 


0558 


0559 


23x 


0560 


0561 


0562 


0563 


0564 


0565 


0566 


0567 


0568 


0569 


0570 


0571 


0572 


0573 


0574 


0575 


24x 


0576 


0577 


0578 


0579 


0580 


0581 


0582 


0583 


0584 


0585 


0586 


0587 


0588 


0589 


0590 


0591 


25x 


0592 


0593 


0594 


0595 


0596 


0597 


0598 


0599 


0600 


0601 


0602 


0603 


0604 


0605 


0606 


0607 


26x 


0608 


0609 


0610 


0611 


0612 


0613 


0614 


0615 


0616 


0617 


0618 


0619 


0620 


0621 


0622 


0623 


27x 


0624 


0625 


0626 


0627 


0628 


0629 


0630 


0631 


0632 


0633 


0634 


0635 


0636 


0637 


0638 


0639 


28x 


0640 


0641 


0642 


0643 


0644 


0645 


0646 


0647 


0648 


0649 


0650 


0651 


0652 


0653 


0654 


0655 


29x 


0656 


0657 


0658 


0659 


0660 


0661 


0662 


0663 


0664 


0665 


0666 


0667 


0668 


0669 


0670 


0671 


2Ax 


0672 


0673 


0674 


0675 


0676 


0677 


0678 


0679 


0680 


0681 


0682 


0683 


0684 


0685 


0686 


0687 


2Bx 


0688 


0689 


0690 


0691 


0692 


0693 


0694 


0695 


0696 


0697 


0698 


0699 


0700 


0701 


0702 


0703 


2Cx 


0704 


0705 


0706 


0707 


0708 


0709 


0710 


0711 


0712 


0713 


0714 


0715 


0716 


0717 


0718 


0719 


2Dx 


0720 


0721 


0722 


0723 


0724 


0725 


0726 


0727 


0728 


0729 


0730 


0731 


0732 


0733 


0734 


0735 


2EX 


0736 


0737 


0738 


0739 


0740 


0741 


0742 


0743 


0744 


0745 


0746 


0747 


0748 


0749 


0750 


0751 


2Fx 


0752 


0753 


0754 


0755 


0756 


0757 


0758 


0759 


0760 


0761 


0762 


0763 


0764 


0765 


0766 


0767 


30x 


0768 


0769 


0770 


0771 


0772 


0773 


0774 


0775 


0776 


0777 


0778 


0779 


0780 


0781 


0782 


0783 


31x 


0784 


0785 


0786 


0787 


0788 


0789 


0790 


0791 


0792 


0793 


0794 


0795 


0796 


0797 


0798 


0799 


32x 


0800 


0801 


0802 


0803 


0804 


0805 


0806 


0807 


0808 


0809 


0810 


0811 


0812 


0813 


0814 


0815 


33x 


0816 


0817 


0818 


0819 


0820 


0821 


0822 


0823 


0824 


0825 


0826 


0827 


0828 


0829 


0830 


0831 


34x 


0832 


0833 


0834 


0835 


0836 


0837 


0838 


0839 


0840 


0841 


0842 


0843 


0844 


0845 


0846 


0847 


35x 


0848 


0849 


0850 


0851 


0852 


0853 


0854 


0855 


0856 


0857 


0858 


0859 


0860 


0861 


0862 


0863 


36x 


0864 


0865" 


0866 


0867 


0868 


0869 


0870 


0871 


0872 


0873 


0874 


0875 


0876 


0877 


0878 


0879 


37x 


0880 


0881 


0882 


0883 


0884 


0885 


0886 


0887 


0888 


0889 


0890 


0891 


0892 


0893 


0894 


0895 


38x 


0896 


0897 


0898 


0899 


0900 


0901 


0902 


0903 


0904 


0905 


0906 


0907 


0908 


0909 


0910 


0911 


39x 


0912 


0913 


0914 


0915 


0916 


0917 


0918 


0919 


0920 


0921 


0922 


0923 


0924 


0925 


0926 


0927 


3Ax 


0928 


0929 


0930 


0931 


0932 


0933 


0934 


0935 


0936 


0937 


0938 


0939 


0940 


0941 


0942 


0943 


3Bx 


0944 


0945 


0946 


0947 


0948 


0949 


0950 


0951 


0952 


0953 


0954 


0955 


0956 


0957 


0958 


0959 


3Cx 


0960 


0961 


0962 


0963 


0964 


0965 


0966 


0967 


0968 


0969 


0970 


0971 


0972 


0973 


0974 


0975 


3Dx 


0976 


0977 


0978 


0979 


0980 


0981 


0982 


0983 


0984 


0985 


0986 


0987 


0988 


0989 


0990 


0991 


3EX 


0992 


0993 


0994 


0995 


0996 


0997 


0998 


0999 


1000 


1001 


1002 


1003 


1004 


1005 


1006 


1007 


3Fx 


1008 


1009 


1010 


1011 


1012 


1013 


1014 


1015 


.1016 


1017 


1018 


1019 


1020 


1021 


1022 


1023 



102 





x = 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


40x 


1024 


1025 


1026 


1027 


1028 


1029 


1030 


1031 


1032 


1033 


1034 


1035 


1036 


1037 


1038 


1039 


aix 


1040 


1041 


1042 


1043 


1044 


1045 


1046 


1047 


1048 


1049 


1050 


1051 


1052 


1053 


1054 


1055 


42x 


1056 


1057 


1058 


1059 


1060 


1061 


1062 


1063 


1064 


1065 


1066 


1067 


1068 


1069 


1070 


1071 


43x 


1072 


1073 


1074 


1075 


1076 


1077 


1078 


1079 


1080 


1081 


1082 


1083 


1084 


1085 


1086 


1087 


44x 


1088 


1089 


1090 


1091 


1092 


1093 


1094 


1095 


1096 


1097 


1098 


1099 


1100 


1101 


1102 


1103 


45x 


1104 


1105 


1106 
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1111 
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46x 


1120 
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1123 
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1125 
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1128 
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1130 


1131 
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1135 


47x 
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4 Ax 


1184 
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1199 
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1200 
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4 EX 
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2009 
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2 
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F 
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2099 


2100 
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2108 
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2110 
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84x 


2112 
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2120 
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2127 


85x 


2128 


2129 


2130 


2131 


2132 
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2140 
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2142 


2143 


86x 
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2145 


2146 


2147 


2148 


2149 


2150 
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2152 
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2154 


2155 


2156 
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2159 


87x 


2160 


2161 


2162 


2163 


2164 


2165 


2166 


2167 


2168 


2169 


2170 


2171 


2172 


2173 


2174 


2175 


88x 


2176 


2177 


2178 


2179 


2180 


2181 


2182 


2183 


2184 


2185 


2186 
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2188 


2189 


2190 
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89x 


2192 


2193 
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2201 
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2207 
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8Cx 


2240 
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2250 
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8Dx 
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2257 


2258 
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2262 
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2297 
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2302 


2303 


90x 


2304 


2305 


2306 
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2308 


2309 
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2314 


2315 
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2317 


2318 


2319 


91x 
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2321 
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2324 
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2326 


2327 


2328 
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2330 
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2332 
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2335 


92x 


2336 


2337 


2338 


2339 


2340 


2341 


2342 


2343 


2344 
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2346 
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93x 
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96x 


2400 
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2412 


2413 


2414 


2415 


97x 


2416 


2417 


2418 
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2420 


2421 


2422 


2423 


2424 
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2426 


2427 


2428 


2429 


2430 


2431 


98x 


2432 


2433 
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2437 
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2439 
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2533 


2534 


253 5 


2536 


2537 


2538 


2539 


2540 


2541 


2542 


2543 


9Fx 


2544 


2545 


2546 


2547 


2548 


2549 


2550 


2551 


2552 


2553 


2554 


2555 


2556 


2557 


2558 


2559 


AOx 


2560 


2561 


2562 


2563 


2564 


2565 


2566 


2567 


2568 


2569 


2570 


2571 


2572 


2573 


2574 


2575 


A1x 


2576 


2577 


2578 


2579 


2580 


2581 


2582 


2583 


2584 


2585 


2586 


2587 


2588 


2589 


2590 


2591 


A2x 


2592 


2593 


2594 


2595 


2596 


2597 


2598 


2599 


2600 


2601 


2602 


2603 


2604 


2605 


2606 


2607 


A3x 


2608 


2609 


2610 


2611 


2612 


2613 


2614 


2615 


2616 


2617 


2618 


2619 


2620 


2621 


2622 


2623 


A4x 


2624 


2625 


2626 


2627 


2628 


2629 


2630 


2631 


2632 


2633 


2634 


2635 


2636 


2637 


2638 


2639 


A5x 


2640 


2641 


2642 


2643 


2644 


2645 


2646 


2647 


2648 


2649 


2650 


2651 


2652 


2653 


2654 


2655 


A6x 


2656 


2657 


2658 


2659 


2660 


2661 


2662 


2663 


2664 


2665 


2666 


2667 


2668 


2669 


2670 


2671 


A7x 


2672 


2673 


2674 


26 75 


2676 


2677 


2678 


2679 


2680 


2681 


2682 


2683 


2684 


2685 


2686 


2687 


A8x 


2688 


2689 


2690 


2691 


2692 


2693 


2694 


2695 


2696 


2697 


2698 


2699 


27C0 


2701 


2702 


2703 


A9x 


2704 


2705 


2706 


2707 


2708 


2709 


2710 


271 1 


2712 


2713 


2714 


2715 


2716 


2717 


2718 


2719 


AAX 


2720 


2721 


2722 


2723 


2724 


2725 


2726 


2727 


2728 


2729 


2730 


2731 


2732 


2733 


2734 


2735 


ABx 


2736 


2737 


2738 


2739 


2740 


2741 


2742 


274 3 


2744 


2745 


2746 


2747 


2748 


2749 


2750 


2751 


ACx 


2752 


2753 


2754 


2755 


2756 


2757 


2758 


2759 


2760 


2761 


2762 


2763 


276!' 


?765 


2766 


2767 


ADx 


2768 


2769 


2770 


2771 


2772 


2773 


2774 


2775 


2776 


2777 


2778 


2779 


2780 


2781 


2782 


2783 


AEX 


2784 


2785 


2786 


2787 


2788 


2789 


2790 


2791 


2792 


2793 


2794 


2795 


2796 


2797 


2798 


2799 


AFx 


2800 


2801 


2802 


2803 


2804 


2805 


2806 


2807 


2808 


2809 


2810 


2811 


2812 


2813 


2814 


2815 


BOx 


2816 


281? 


2818 


2819 


2820 


2821 


2822 


2823 


2824 


2825 


2826 


2827 


2828 


2829 


2830 


2831 


B1x 


2832 


2833 


2834 


2835 


2836 


2837 


2838 


2839 


2840 


2841 


2842 


2843 


2844 


2845 


2846 


2847 


B2x 


2848 


2849 


2850 


2851 


2852 


2853 


2854 


2855 


2856 


2857 


2858 


2859 


2860 


2861 


2862 


2863 


B3x 


2864 


2865 


2866 


2867 


2868 


2869 


2870 


2871 


2872 


2873 


2874 


2875 


2876 


2877 


2878 


2679 


B4x 


2880 


2881 


2882 


2883 


2884 


2885 


2886 


2887 


2888 


2889 


2890 


2891 


2892 


2893 


2894 


2895 


B5x 


2896 


2897 


2898 


2899 


2900 


2901 


2902 


2903 


2904 


2905 


2906 


2907 


2908 


2909 


2910 


2911 


B6x 


2912 


2913 


2914 


2915 


2916 


2917 


2918 


2919 


2920 


2921 


2922 


2923 


2924 


2925 


2926 


2927 


B7x 


2928 


2929 


2930 


2931 


2932 


2933 


2934 


2935 


2936 


2937 


2938 


2939 


2940 


2941 


2942 


2943 


B8x 


2944 


2945 


2946 


2947 


2948 


2949 


2950 


2951 


2952 


2953 


2954 


2955 


2956 


2957 


2958 


2959 


B9x 


2960 


2961 


2962 


2963 


2964 


2965 


2966 


2967 


2968 


2969 


2970 


2971 


2972 


2973 


297" 


2975 


BAx 


2976 


2977 


2978 


2979 


2980 


2981 


2982 


2983 


2984 


2985 


2986 


2987 


2988 


2989 


2990 


2991 


BBx 


2992 


2993 


2994 


2995 


2996 


2997 


2998 


2999 


3000 


3001 


3002 


3003 


3004 


3005 


3006 


3007 


BCx 


3008 


3009 


3010 


3011 


3012 


3013 


3014 


3015 


3016 


3017 


3018 


3019 


3020 


3021 


3022 


3023 


BOX 


3024 


3025 


3026 


3027 


3028 


3029 


3030 


3031 


3032 


3033 


3034 


3035 


3036 


3037 


3038 


3039 


BEx 


3040 


3041 


3042 


3043 


3044 


3045 


3046 


304 7 


3048 


3049 


3050 


3051 


3052 


3053 


3054 


3055 


BFx 


3056 


3057 


3058 


3059 


3060 


3061 


3062 


3063 


3064 


3065 


3066 


3067 


3068 


3069 


3070 


3071 
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x = 


1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


COx 


3072 


3073 


3074 


3075 


3076 


J077 


3078 


3079 


3080 


3081 


3082 


3083 


3084 


JU03 


3086 


3087 


C1x 


3088 


3089 


3090 


3091 


3092 


3093 


3094 


3095 


3096 


3097 


3098 


3099 


3100 


3101 


3102 


3103 


C2x 


3104 


3105 


3106 


3107 


3108 


3109 


3110 


3111 


3112 


3113 


3114 


3115 


3116 


3117 


3118 


3119 


C3x 


3120 


3121 


3122 


3123 


3124 


3125 


3126 


3127 


3128 


3129 


3130 


3131 


3132 


3133 


3134 


3135 


C4x 


3136 


3137 


3138 


3139 


3140 


3141 


3142 


3143 


3144 


3145 


3146 


3147 


3148 


3149 


3150 


3151 


C5x 


1152 


3153 


3154 


3155 


3156 


3157 


3158 


3159 


3160 


3161 


3162 


3163 


3164 


3165 


3166 


3167 


C6x 


3168 


3169 


3170 


3171 


3172 


3173 


3174 


3175 


3176 


3177 


3178 


3179 


3180 


3181 


3182 


3183 


C7x 


3184 


3185 


3186 


3187 


3188 


3189 


3190 


3191 


3192 


3193 


3194 


3195 


3196 


3197 


3198 


3199 


C8x 


3200 


3201 


3202 


3203 


3204 


3205 


3206 


3207 


3208 


3209 


3210 


3211 


3212 


3213 


3214 


3215 


C9x 


3216 


3217 


3218 


3219 


3220 


3221 


3222 


3223 


3224 


3225 


3226 


3227 


3228 


3229 


3230 


3231 


CAx 


3232 


3233 


3234 


32 35 


3236 


3237 


3238 


3239 


3240 


3241 


3242 


3243 


3244 


3245 


3246 


3247 


CBx 


3248 


3249 


3250 


3251 


3252 


3253 


3254 


3255 


3256 


3257 


3258 


3259 


3260 


3261 


3262 


3263 


CCx 


3264 


3265 


3266 


3267 


3268 


3269 


3270 


3271 


3272 


3273 


3274 


3275 


3276 


3277 


3278 


3279 


CDx 


3280 


3281 


3282 


32 83 


3284 


3285 


3286 


3287 


3288 


3289 


3290 


3291 


3292 


3293 


3294 


3295 


CEx 


3296 


3297 


3298 


3299 


3300 


3301 


3302 


3303 


3304 


3305 


3306 


3307 


3308 


3309 


3310 


3311 


CFx 


3312 


3313 


3314 


3315 


3316 


3317 


3318 


3319 


3320 


3321 


3322 


3323 


3324 


3325 


3326 


3327 


DOx 


3328 


3329 


3330 


3331 


3332 


3333 


3334 


3335 


3336 


3337 


3338 


3339 


3340 


3341 


3342 


3343 


D1x 


3344 


3345 


3346 


3347 


3348 


3349 


3350 


3351 


3352 


3353 


3354 


3355 


3356 


3357 


3358 


3359 


D2x 


3360 


3361 


3362 


3363 


3364 


3365 


3366 


3367 


3368 


3369 


3370 


3371 


3372 


3373 


3374 


3375 


D3x 


3376 


3377 


3378 


3379 


3380 


3381 


3382 


3383 


3384 


3385 


3386 


3387 


3388 


3389 


3390 


3391 


DOx 


3392 


3393 


3394 


33 95 


3396 


3397 


3398 


3399 


3400 


3401 


3402 


3403 


3404 


3405 


3406 


3407 


D5x 


3408 


3409 


3410 


3411 


3412 


3413 


3414 


3415 


3416 


3417 


3418 


3419 


3420 


3421 


3422 


3423 


D6x 


3424 


3425 


3426 


3427 


3428 


3429 


3430 


3431 


3432 


3433 


3434 


3435 


3436 


3437 


3438 


3439 


D7x 


3440 


3441 


3442 


3443 


3444 


3445 


3446 


3447 


3448 


3449 


3450 


3451 


3452 


3453 


3454 


3455 


D8x 


3456 


3457 


3458 


3459 


3460 


3461 


3462 


3463 


3464 


3465 


3466 


3467 


3468 


3469 


3470 


3471 


D9x 


3472 


3473 


3474 


3475 


3476 


3477 


3478 


3479 


3480 


3481 


3482 


3483 


3484 


3485 


3486 


3487 


DAx 


3488 


3489 


3490 


3491 


3492 


3493 


3494 


3495 


3496 


3497 


3498 


3499 


3500 


3501 


3502 


3503 


DBx 


3504 


3505 


3506 


3507 


3508 


3509 


3510 


3511 


3512 


3513 


3514 


3515 


3516 


3517 


3518 


3519 


DCx 


3520 


3521 


3522 


3523 


3524 


3525 


3526 


3527 


3528 


3529 


3530 


3531 


3532 


3533 


3534 


3535 


DDX 


3536 


3537 


3538 


3539 


3540 


3541 


3542 


3543 


3544 


3545 


3546 


3547 


3548 


3549 


3550 


3551 


DEX 


3552 


3553 


3554 


3555 


3556 


3557 


3558 


3559 


3560 


3561 


3562 


3563 


3564 


3565 


3566 


3567 


DFx 


3568 


3569 


3570 


3571 


3572 


3573 


3574 


3575 


3576 


3577 


3578 


3579 


3580 


3581 


3582 


3583 


EOx 


3584 


3585 


3586 


35 87 


3588 


3589 


3590 


3591 


3592 . 


3593 


3594 


3595 


3596 


3597 


3598 


3599 


E1X 


3600 


3601 


3602 


3603 


3604 


3605 


3606 


3607 


3608 


3609 


3610 


3611 


3612 


3613 


3614 


3615 


E2x 


3616 


3617 


3618 


3619 


3620 


3621 


3622 


3623 


3624 


3625 


3626 


3627 


3628 


3629 


3630 


3631 


E3x 


3632 


3633 


3634 


3635 


3636 


3637 


3638 


3639 


3640 


3641 


3642 


3643 


3644 


3645 


3646 


3647 


E4x 


3648 


3649 


3650 


3651 


3652 


3653 


3654 


3655 


3656 


3657 


3658 


3659 


3660 


3661 


3662 


3663 


E5x 


3664 


3665 


3666 


3667 


3668 


3669 


3670 


3671 


3672 


3673 


3674 


3675 


3676 


3677 


3678 


3679 


E6x 


3680 


3681 


3682 


3683 


3684 


3685 


3686 


3687 


3688 


3689 


3690 


3691 


3692 


3693 


3694 


3695 


E7x 


3696 


3697 


3698 


3699 


3700 


3701 


3702 


3703 


3704 


3705 


3706 


3707 


3708 


3709 


3710 


3711 


E8x 


3712 


3713 


3714 


3715 


3716 


3717 


3718 


3719 


3720 


3721 


3722 


3723 


3724 


3725 


3726 


3727 


E9x 


3728 


3729 


3730 


3731 


3732 


3733 


3734 


373 5 


3736 


3737 


3738 


3739 


3740 


3741 


3742 


3743 


EAX 


3744 


3745 


3746 


3747 


3748 


3749 


3750 


3751 


3752 


3753 


3754 


3755 


3756 


3757 


3758 


3759 


EBx 


3760 


3761 


3762 


3763 


3764 


3765 


3766 


3767 


3768 


3769 


3770 


3771 


3772 


3773 


3774 


3775 


ECx 


3776 


3777 


3778 


3779 


3780 


3781 


3782 


3783 


3784 


3785 


3786 


3787 


3788 


3789 


3790 


3791 


EDx 


3792 


3793 


3794 


3795 


3796 


3797 


3798 


3799 


3800 


3801 


3802 


3803 


3804 


3805 


3806 


3807 


EEx 


3808 


3809 


3810 


3811 


3812 


3813 


3814 


3815 


3816 


3817 


3818 


3819 


3820 


3821 


3822 


3823 


EFx 


3824 


3825 


3826 


3827 


3828 


3829 


3830 


3831 


3832 


3833 


3834 


3835 


3836 


3837 


3838 


3839 


FOx 


3840 


3841 


3842 


3843 


3844 


3845 


3846 


3847 


3848 


3849 


3850 


3851 


3352 


3853 


3854 


3855 


Fix 


3856 


3857 


3858 


3859 


3860 


3861 


3862 


3863 


3864 


3865 


3866 


3867 


3868 


3869 


3870 


3871 


F2x 


3872 


3873 


3874 


3875 


3876 


3877 


3878 


3879 


3880 


3881 


3882 


3883 


3884 


3885 


3886 


3887 


F3x 


3888 


3889 


3890 


3891 


3892 


3893 


3894 


3895 


3896 


3897 


3898 


3899 


3900 


.3901 


3902 


3903 


Fix 


3904 


3905 


3906 


3907 


3908 


3909 


3910 


3911 


3912 


3913 


3914 


3915 


3916 


3917 


3918 


3919 


F5x 


3920 


3921 


3922 


3923 


3924 


3925 


3926 


3927 


3928 


3929 


3930 


3931 


3932 


3933 


3934 


3935 


F6x 


3936 


3937 


3938 


3939 


3940 


3941 


3942 


3943 


3944 


3945 


3946 


3947 


3948 


3949 


3950 


3951 


F7x 


3952 


3953 


3954 


3955 


3956 


3957 


3958 


3959 


3960 


3961 


3962 


3963 


3964 


3965 


3966 


3967 


F8x 


3968 


3969 


3970 


3971 


3972 


3973 


3974 


3975 


3976 


3977 


3978 


3979 


3980 


3981 


3982 


3983 


F9x 


3984 


3985 


3986 


3987 


3988 


3989 


3990 


3991 


3992 


3993 


3994 


3995 


3996 


3997 


3998 


3999 


FAX 


4000 


4001 


4002 


4003 


4004 


4005 


4006 


4007 


4008 


4009 


4010 


4011 


4012 


4013 


4014 


4015 


FBx 


4016 


4017 


4018 


4019 


4020 


4021 


4022 


4023 


4024 


4025 


4026 


4027 


4028 


4029 


4030 


4031 


FCx 


4032 


4033 


4034 


4035 


4036 


4037 


4038 


4039 


4040 


4041 


4042 


4043 


4044 


4045 


4046 


4047 


FDx 


4048 


4049 


4050 


4051 


4052 


4053 


4054 


4055 


4056 


4057 


4058 


4059 


4060 


4061 


4062 


4063 


FEx 


4064 


4065 


4066 


4067 


4068 


4069 


4070 


4071 


4072 


4073 


4074 


4075 


4076 


4077 


4078 


4079 


FFx 


4080 


4081 


4082 


4083 


4084 


4085 


4086 


4087 


4088 


4089 


4090 


4091 


4092 


4093 


4094 


4095 
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APPENDIX C: MACHINE- INSTRUCTION FORMAT 






BASIC MACHINE FORMAT 

r t — t — i 

I 8 |4 |4 | 
| Operation | | | 
I Code |R1|R2| 

8 ~]n J | 

Operation | | | 

Code |R1| | 



I— + 



RX 



H-+— 



ASSEMBLER OPERAND 
FIELD FORMAT 



RR 



RS 



H-+ 



SI 



l~- +— 



ss 



8 



8 I 



Operation | 
Code I I 



r — t — t — t — i 

8 \H \t* \H |12| 

Operation! I I I I 

Code j Rl I X2 J B2 j D2 | 

L X X 1 — J 



(See Notes 1, 6, 8, and 9 

Rl,D2(X2,B2) 
Rl,D2(,B2) 
R1,S2(X2) 
(See notes 1-4, 7, and 9) 



r — t — t — t — T 

8 |t* |*» |4 |12| 

Operation! I I j I 

Code |R1|R3|B2|D2| 

L L X L J 



— t — r r r — i 

8 |4 | |U |12| 

Operation! I I I I 

Code JR1| j B2 j D2 | 



8 | 8 . | 4 |12| 

Operation! j j j 

Code j 12 | Bl j Dl j 

L X X J 



8 I 

Operation) 

Code | 



7" T12I 

I I I 

I Bl I Dl I 

-X X J 



8 \H \U |4 1 12 1 4 1 12 J 

Operation! I I I I I | 

Code I LI 1 L2 I Bl J Dl I B2 I D2 I 

; L_ 1 x x__ x_— x__ j 



8 I 8 ]4 |12J4 |12| 

Operation! 1)111 

Code I L |B1|D1|B2|D2| 

l L L L L J 



Rl,R2 



Rl 



APPLICABLE INSTRUCTIONS 



All RR instructions 
except SPM and SVC 



SPM 



Rl,R3,D2(B2) 
R1,R3,S2 



R1,D2(B2) 
Rl r S2 
(See Notes 1-3,7, and 8) 



D1(B1),I2 
SI, 12 



DKB1) 
SI 
(See Notes 2, 3, and 6-8) 



D1(L1,B1),D2(L2,B2) 
S1(L1),S2(L2) 



D1(L,B1),D2(B2) 
S1(L),S2 
(See Notes 2,3,5, and 7) 



SVC 






All RX instructions 



BXH,BXLE,LM,STM 



All shift instructions 



All SI instructions 
except LPSW,SSM, 
HIO , SIO, TIO, TCH, TS 



LPSW,SSM,HIO,SIO, 
TIO, TCH, TS 



PACK , UNPK , MVO, AP , 
CP,DP,MP,SP, ZAP 



NC,OC,XC,CLC,MVC r MVN, 
MVZ, TR,TRT, ED, EDMK 



l — X. 



106 



Notes for Appendix C ; 

1. Rl, R2, and R3 are absolute expressions that specify general or floating-point reg- 
isters. The general register numbers are through 15; floating-point register num- 
bers are 0, 2, 4, and 6. 

2. Dl and D2 are absolute expressions that specify displacements. A value of - 4095 
may be specified. 

3. Bl and B2 are absolute expressions that specify base registers. Register numbers are 
- 15. 

4. X2 is an absolute expression that specifies an index register. Register numbers are 
- 15. 

5. L, Ll, and L2 are absolute expressions that specify field lengths- An L expression 
can specify a value of 1 - 256. LI and L2 expressions can specify a value of 1 - 16. 
In all cases, the assembled value will be one less than the specified value. 

6. I and 12 are absolute expressions that provide immediate data. The value of the 
expression may be - 255. 

7. SI and S2 are absolute or relocatable expressions that specify an address. 

8. RR, RS, and SI instruction fields that are blank under BASIC MACHINE FORMAT are not 
examined during instruction execution. The fields are not written in the symbolic 
operand, but are assembled as binary zeros. 

9. Rl specifies a 4-bit mask in the BC and BCR machine instructions. 
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APPENDIX D; MACHINE-INSTRUCTION MNEMONIC OPERATION CODES 



Figure D-l lists all machine operation codes 
and their associated assembler instructions 
and mnemonics in operation code order. 

Figure D-2 contains the mnemonic operation 
codes for all machine instructions that can 
be represented in assembler language, in- 
cluding extended mnemonic operation codes. 
It is in alphabetic order by instruction. 
Indicated for each instruction are both the 
mnemonic and machine operation codes , 
explicit and implicit operand formats, pro- 
gram interruptions possible, and condition 
code set. 

The column headings in this appendix and 
the information each column provides follow. 

Instruction ; This column contains the name 
of the instruction associated with the 
mnemonic operation code. 

Mnemonic Operation Code: This column gives 
the mnemonic operation code for the machine 
instruction. This is written in the opera- 
tion field when coding the instruction. 

Machine Operation Code: This column contains 
the hexadecimal equivalent of the actual 
machine operation code. The operation code 
will appear in this form in most storage 
dumps and when displayed on the system con- 
trol panel. For extended mnemonics, this 
column also contains the mnemonic code of 
the instruction from which the extended 
mnemonic is derived. 



Operand Format : This column shows the 
symbolic format of the operand field in 
both explicit and implicit form. For both 
forms, Rl, R2 , and R3 indicate general 
registers in operands one, two, and three 
respectively. X2 indicates a general 
register used as an index register in the 
second operand. Instructions which require 
an index register (X2) but are not to be 
indexed are shown with a replacing X2 . 
L, LI, and L2 indicate lengths for either 
operand, operand one, and operand two 
respectively. 

For the explicit format, Dl and D2 in- 
dicate a displacement and Bl and B2 indicate 
a base register for operands one and two. 

For the implicit format, Dl , Bl, and D2 , 
B2 are replaced by SI and S2 which indicate 
a storage address in operands one and two. 

Type of Instruction : This column gives the 
basic machine format of the instruction 
(RR, RX, SI, or SS) . If an instruction is 
included in a special feature or is an 
extended mnemonic, this is also indicated. 

Program Interruptions Possible : This 



column indicates 
terrupts for this 
viations used are 
Specification, Ov 
Op - Operation (i 
and Other - other 
listed. The type 
by: D - Decimal , 
Fixed Point. 



the possible program in- 
instruction. The abbre- 

: A - Addressing, S - 
- Overflow, P - Protection, 

f feature is not installed) 
interruptions which are 
of overflow is indicated 
E - Exponent, or F - 



Condition Code Set : The condition set as 
a result of this instruction is indicated 
in this column. (See legend following the 
table.) 
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> 
ro 



H 

(D 

O 
I 



tr 1 

H- 

en 
rt 

O 

r+ 

o 

H- 

(D 

H 

cn 
rt 
H 

C 

o 
rt 
H- 
O 

w 

tr 

o 

CD 

pj 
rt 

H- 

o 

n 
o 
Pi 

CD 




ching and 
Status Switching 



\ 




-Ox- 




-Ix- 




-2x- 




-3x- 


| 











Load Positive . . 


. . LPR 




. LPDR 




. LPER 


1 








Load Negative . 


. . LNR 


Load Negative . . 


. LNDR 


Load Negative . . 


. LNER 


2 








Load and Test . . 


. . LTR 




. LTDR 




. LTER 


3 








Load Complement 


. . LCR 


Load Complement. 


. LCDR 


Load Complement. 


. LCER 


4 
5 


Set Program Mask. 
Branch and Link. . 


. SPM 
. BALR 


AND 

Compare Logical 


NR 
. .CLR 


Halve 


. HDR 


Halve 


. HER 






6 


Branch on 


Count . 


. BCTR 


OR 


. .OR 










7 


Branch/Cc 


ndition. 


. BCR 


Exclusive OR . . 


. . XR 










8 




















9 


Insert Key 




. ISK 




. . CR 




. CDR 




. CER 


A 


Supervisor 


Call . . 


. SVC 


Add 


. . AR 


Add N 


. ADR 




. AER 


B 










. . SR 




. SDR 




. SER 


L 








Multiply 


. .MR 








. MER 


L> 








Divide 


. . DR 


Divide 


. DDR 


Divide 


. DER 


t 










. .ALR 


Add U 


. AWR 


Add U 


. AUR 


h 








Subtract Logical. 


. .SLR 




. SWR 


Subtract 


SUR 



/Branching 
Status Switching 
and Shifting 



Fixed-Point 
Logical and 
Input-Output 



-8x- 



-9x- 



Set System Mask . . . SSM 

Load PSW LPSW 

Diagnose 

Write Direct WRD 

Read Direct RDD 

Branch/High BXH 

Branch/Low-Equal . . BXLE 

Shift Right SL SRL 

Shift Left SL SLL 

Shift Right S SRA 

Shift Left S SLA 

Shift Right DL .... SRDL 

Shift Left DL SLDL 

Shift Right D SRDA 

Shift Left D SLDA 



Store Multiple. . . . STM 
Test Under Mask. . . TM 

Move MVI 

Test and Set TS 

AND Nl 

Compare Logical . . CLI 

OR Ol 

Exclusive OR .... XI 
Load Multiple . . . . LM 



Start l-O SIO 

Test l-O TIO 

Halt l-O HIO 

Test Channel .... TCH 



Operatio 


rt Code Notes 


U = 


Unnormalized 


S = 


Single 


D = 


Double 


N = 


Normalized 


SL = 


Single Logical 


DL = 


Double Logical 



\ 


-4x- 






-5x- 




-ox- 




-7x- 


1 


n 


Store Character . 
Insert Character . 

Branch and Link . 
Branch on Count . 
Branch/Condition 

Add 


, STH 
, LA 
. STC 
. IC 
. EX 
. BAL 
. BCT 
. BC 

. CH 


Stnr, 




ST 

. CL 
, O 

. X 

C 

s 

M 

. AL 
. SL 


Divide 


STD 

LD 
CD 
AD 
. SD 
, . MD 
DD 

. . SW 


Divide 

Subtract U . . . . 




l 

2 
3 

4 








5 
6 

7 
R 


Compare 
OR, . 
Exclusive 


Logical. 
OR . . 




9 

A 


Compare 




. CE 


B 
C 
D 
E 
F 


Convert-Decimal 
Convert-Binary . 


. SH 

. CVD 
. CVB 


Subtract 
Multiply 

Add Logi 
Subtract 


cal . . . 
Logical . 


, . SE 

. . AU 
. . SU 



Logical 



Move Numeric . . MVN 

Move Characters . . MVC 

Move Zone MVZ 

AND NC 

Compare Logical . . CLC 

OR OC 

Exclusive OR. . . . XC 



Move with Offset 

Pack 

Unpack 



MVO 
PACK 
UNPK 



Translate 

Translate and Test 

Edit 

Edit and Mark . . 



TR 
TRT 
ED 
EDMK 



Zero and Add .... ZAP 

Compare CP 

Add AP 

Subtract SP 

Multiply MP 

Divide DP 



Instruction 


Mnemonic 


Machine 


Operand Format 




Operation 


Operation 








Code 


Code 


Explicit 


Implicit 


Add 


A 


5A 


Rl,D2(X2,B2)or Rl, D2(,B2) 


Rl,S2(X2)or R1,S2 


Add 


AR 


1A 


R1,R2 




Add Decimal 


AP 


FA 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Add Halfword 


AH 


4A 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Add Logical 


AL 


5E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Add Logical 


ALR 


IE 


R1,R2 




Add Normalized, Long 


AD 


6A 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Add Normalized, Long 


ADR 


2A 


R1,R2 




Add Normalized, Short 


AE 


7A 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Add Normalized, Short 


AER 


3A 


R1,R2 




Add Unnormalized,Long 


AW 


6E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl / S2 


Add Unnormalized,Long 


AWR 


2E 


R1,R2 




Add Unnormalized, Short 


AU 


7E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Add Unnormalized, Short 


AUR 


3E 


R1,R2 




And Logical 


N 


54 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


And Logical 


NC 


D4 


D1(L,B1),D2(B2) 


S1(L),S2 or S1,S2 


And Logical 


NR 


14 


R1,R2 




And Logical Immediate 


Nl 


94 


D1(B1),|2 


SI, 12 


Branch and Link 


BAL 


45 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Branch and Link 


BALR 


05 


R1,R2 




Branch on Condition 


BC 


47 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Branch on Condition 


BCR 


07 


R1,R2 




Branch on Count 


BCT 


46 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Branch on Count 


BCTR 


06 


R1,R2 




Branch on Equal 


BE 


47(BC 8) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on High 


BH 


47(BC 2) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Index High 


BXH 


86 


R1,R3,D2(B2) 


R1,R3,S2 


Branch on Index Low or Equal 


BXLE 


87 


R1,R3,D2(B2) 


R1,R3,S2 


Branch on Low 


BL 


47(BC 4) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch if Mixed 


BM 


47(BC 4) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Minus 


BM 


47(BC 4) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Not Equal 


BNE 


47(BC 7) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Not High 


BNH 


47(BC 13) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Not Low 


BNL 


47(BC 11) 


D2(X2, B2)or D2(,B2 ) 


S2(X2) or S2 


Branch on Not Minus 


BNM 


47(BC 11) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Not Ones 


BNO 


47(BC 14) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch on Not Plus 


BNP 


47(BC 13) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Not Zeros 


BNZ 


47(BC 7) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch if Ones 


BO 


47(BC 1) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Overflow 


BO 


47(BC 1) 


D2(X2,B2)or D2(, B2) 


S2(X2) or S2 


Branch on Plus 


BP 


47(BC 2) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch if Zeros 


BZ 


47(BC 8) 


D2(X2, B2)or D2(, B2) 


S2(X2) or S2 


Branch on Zero 


BZ 


47(BC 8) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch Unconditional 


B 


47(BC 15) 


D2(X2,B2)or D2(,B2) 


S2(X2) or S2 


Branch Unconditional 


BR 


07(BCR 15) 


R2 




Compare Algebraic 


C 


5? 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2orRl,S2 


Compare Algebraic 


CR 


19 


R1,R2 




Compare Decimal 


CP 


F9 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Compare Halfword 


CH 


49 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Compare Logical 


CL 


55 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Compare Logical 


CLC 


D5 


D1(L,B1),D2(B2) 


S1(L),S2 or S1,S2 


Compare Logical 


CLR 


15 


R1,R2 




Compare Logical Immediate 


CLI 


95 


D1(BI),|2 


SI, 12 


Compare, Long 


CD 


69 


RI,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Compare, Long 


CDR 


29 


R1,R2 




Compare, Short 


CE 


79 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 


Compare, Short 


CER 


39 


R1,R2 




Convert to Binary 


CVB 


4F 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)or R1,S2 


Convert to Decimal 


CVD 


4E 


Rl,D2(X2,B2)orRl,D2(,B2) 


Rl,S2(X2)orRl,S2 



Figure D-2. Machine Instruction Sununary (1 of 7) 
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Instruction 


Type of 
Instruction 


Program Interruption 
Possible 




Condi t 


on Code Set 




A 


S 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


Add 

Add 

Add Decimal 

Add Halfword 

Add Logical 


RX 

RR 

SS, Decimal 

RX 

RX 


X 

X 
X 

X 


X 

X 
X 


F 
F 
D 
F 


X 


X 


Data 


Sum=0 
Sum=0 
Sum=0 
Sum=0 
Sum=0(H) 


Sum<0 
Sum<0 
Sum<0 
Sum<0 
Sum 0© 


Sum>0 
Sum>0 
Sum>0 
Sum>0 
Sum= 0© 


Overflow 
Overflow 
Overflow 
Overflow 
Sum 


Add Logical 
Add Normalized, Long 
Add Normalized, Long 
Add Normalized, Short 
Add Normalized, Short 


RR 

RX, Floating Pt. 
RR,Floating Pt. 
RX, Floating Pt. 
RR,Floating Pt. 


X 
X 


X 
X 
X 
X 


E 
E 
E 
E 




X 
X 
X 
X 


B,C 
B,C 
B,C 
B,C 


Sum=0 (H) 

R 

R 

R 

R 


Sum= 0© 

L 

L 

L 

L 


Sum= 0® 

M 

M 

M 

M 


Sum 0® 

P 

P 

P 

P 


Add Unnormalized, Long 
Add Unnormalized, Long 
Add Unnormalized, Short 
Add Unnormalized, Short 
Add Logical 


RX, Floating Pt. 
RR, Floating Pt. 
RX, Floating Pt. 
RR, Floating Pt. 
RX 


X 
X 
X 


X 
X 
X 
X 
X 


E 
E 
E 
E 




X 
X 
X 
X 


C 
C 
C 
C 


R 
R 
R 
R 
J 


L 
L 
L 
L 
K 


M 
M 
M 
M 


P 
P 
P 
P 


And Logical 

And Logical 

And Logical Immediate 

Branch and Link 

Branch and Link 


SS 
RR 
SI 
RX 

RR 


X 
X 






X 
X 






J 
J 
J 
N 
N 


K 
K 
K 
N 
N 


N 
N 


N 
N 


Branch on Condition 
Branch on Condition 
Branch on Count 
Branch on Count 
Branch on Equal 


RX 
RR 
RX 
RR 
RX, Ext.Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N • 


Branch on High 
Branch on Index High 
Branch on Index Low or Equal 
Branch on Low 
Branch if Mixed 


RX, Ext. Mnemonic 
RX, Ext.Mnemonic 
RX, Ext. Mnemonic 
RX , Ext .Mnemonic 
RX, Ext.Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 

N 
N 


N 
N 
N 
N 
N 


Branch on Minus 
Branch on Not Equal 
Branch on Not High 
Branch on Not Low 
Branch on Not Minus 


RX, Ext. Mnemonic 
RX, Ext.Mnemonic 
RX, Ext. Mnemonic 
RX, Ext.Mnemonic 
RX, Ext.Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Branch on Not Ones 
Branch on Not Plus 
Branch on Not Zeros 
Branch if Ones 
Branch on Overflow 


RX , Ext. Mnemoni c 
RX, Ext.Mnemonic 
RX, Ext.Mnemonic 
RX, Ext. Mnemonic 
RX, Ext.Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Branch on Plus 
Branch if Zeros 
Branch on Zero 
Branch Unconditional 
Branch Unconditional 


RX, Ext.Mnemonic 
RX,Ext. Mnemonic 
RX, Ext.Mnemonic 
RX, Ext.Mnemonic 
RR, Ext. Mnemonic 














N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Compare Algebraic 
Compare Algebraic 
Compare Decimal 
Compare Halfword 
Compare Logical 


RX 

RR 

SS, Decimal 

RX 

RX 


X 

X 
X 
X 


X 

X 
X 






X 


Data 


Z 
Z 

z 
z 
z 


AA 
AA 
AA 
AA 
AA 


BB 
BB 
BB 
BB 
BB 




Compare Logical 
Compare Logical 
Compare Logical Immediate 
Compare, Long 
Compare, Long 


SS 

RR 

SI 

RX, Floating Pt. 

RR, Floating Pt. 


X 
X 
X 
X 
X 


X 

X 
X 






X 
X 




z 

z 
z 
z 
z 


AA 
AA 
AA 
AA 
AA 


BB 
BB 
BB 
BB 
BB 




Compare, Short 
Compare, Short 
Convert to Binary 
Convert to Decimal 


RX, Floating Pt. 
RR,Floating Pt. 
RX 
RX 


X 

X 
X 


X 
X 
X 
X 




X 


X 
X 


Data,F 


z 
z 

N 
N 


AA 
AA 
N 
N 


BB 
BB 
N 
N 


N 
N 



Figure D-2. Machine Instruction Summary (2 of 7) 
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Instruction 


Mnemonic 


Ma chine 


Operand Format 






Operation 


Operation 










Code 


Code 


Explicit 


Implic 


t 


Divide 


D 


5D 


Rl,D2(X2,B2)or R1,D2(,B2) 


Rl, S2(X2) 


or Rl , S2 


Divide 


DR 


ID 


R1,R2 






Divide Decimal 


DP 


FD 


D1,(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Divide, Long 


DD 


6D 


Rl,D2(X2,B2),or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Divide, Long 


DDR 


2D 


R1,R2 






Divide, Short 


DE 


7D 


Rl,D2(X2,B2)orRl / D2(,B2) 


R1,S2(X2) 


or R1,S2 


Divide, Short 


DER 


3D 


R1,R2 






Edit 


ED 


DE 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Edit and Mark 


EDMK 


DF 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Exclusive Or 


X 


57 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Exclusive Or 


XC 


D7 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Exclusive Or 


XR 


17 


R1,R2 






Exclusive Or Immediate 


XI 


97 


D1(B1),12 


SI, 12 




Execute 


EX 


44 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


R1,S2 


Halve, Long 


HDR 


24 


R1,R2 






Halve, Short 


HER 


34 


R1,R2 






Halt I/O 


HIO 


9E 


D1(B1) 






Insert Character 


IC 


43 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Insert Storage Key 


ISK 


09 


R1,R2 






Load 


L 


58 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load 


LR 


18 


R1,R2 






Load Address 


LA 


41 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Load and Test 


LTR 


12 


R1,R2 






Load and Test, Long 


LTDR 


22 


R1,R2 






Load and Test, Short 


LTER 


32 


R1,R2 






Load Complement 


LCR 


13 


R1,R2 






Load Complement, Long 


LCDR 


23 


R1,R2 






Load Complement, Short 


LCER 


33 


R1,R2 






Load Halfword 


LH 


48 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load, Long 


LD 


68 


Rl,D2(X2,B2)or R1,D2(,B2) 


R 1 , S2(X2) 


or R1,S2 


Load, Long 


LDR 


28 


R1,R2 






Load Multiple 


LM 


98 


R1,R3,D2(B2) 


R1,R3,S2 




Load Negative 


LNR 


11 


R1,R2 






Load Negative, Long 


LNDR 


21 


R1,R2 






Load Negative, Short 


LNER 


31 


R1,R2 






Load Positive 


LPR 


10 


R1,R2 






Load Positive, Long 


LPDR 


20 


R1,R2 






Load Positive, Short 


LPER 


30 


R1,R2 






Load PSW 


LPSW 


82 


D1(B1) 






Load, Short 


LE 


78 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Load, Short 


LER 


38 


R1,R2 






Move Characters 


MVC 


D2 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Move Immediate 


MVI 


92 


D1(B1), 12 


SI, 12 




Move Numerics 


MVN 


Dl 


D1(L,B1),D2(B2) 


S1(L),S2 


or SI , S2 


Move with Offset 


MVO 


Fl 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Move Zones 


MVZ 


D3 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Multiply 


M 


5C 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Multiply 


MR 


IC 


R1,R2 






Multiply Decimal 


MP 


FC 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Mulitply Halfword 


MH 


4C 


Rl,D2(X2.B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Multiply, Long 


MD 


6C 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Multiply, Long 


MDR 


2C 


R1,R2 






Multiply, Short 


ME 


7C 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Multiply, Short 


MER 


3C 


R1,R2 






No Operation 


NOP 


47(BC 0) 


D2(X2,B2)or D2(,B2) 


S2(X2) 


or S2 



V. 



Figure D-2. Machine Instruction Summary (3 of 7) 



112 



Instruction 


Type of 
Instruction 


Program Interrupt 
Possible 


ions 


Condition Code Set 


A 


s 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


Divide 
Divide 

Divide Decimal 
Divide, Long 
Divide, Long 


RX 

RR 

SS, Decimal 

RX,Floating Pt. 

RR, Floating Pt. 


X 

X 
X 


X 
X 
X 
X 
X 


E 
E 


X 


X 
X 
X 


F 

F 

D, Data 

B,E 

B,E 


N 

N 

N* 

N 

N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Divide, Short 

Divide, Short 

Edit 

Edit and Mark 

Exclusive Or 


RX, Floating Pt. 
RR, Floating Pt. 
SS, Decimal 
SS, Decimal 
RX 


X 

X 
X 
X 


X 
X 

X 


E 
E 


X 
X 


X 
X 
X 
X 


B,E 
B,E 
Data 
Data 


N 
N 
S 
S 
J 


N 
N 
T 
T 
K 


N 
N 
U 
U 


N 
N 


Exclusive Or 
Exclusive Or 
Exclusive Or Immediate 
Execute 
Halve, Long 


SS 

RR 

SI 

RX 

RR, Floating Pt. 


X 

X 
X 


X 
X 




X 
X 


X 


G 


J 

J 

J 

(May be 

N 


K 
K 
K 
set by this ins 
N 


truction) 
N 


N 


Halve, Short 
Halt I/O 
Insert Character 
Insert Storage Key 
Load 


RR, Floating Pt. 

SI 

RX 

RR 

RX 


X 
X 
X 


X 

X 
X 






X 
X 


A 
A 


N 

DD 

N 

N 

N 


N 

CC 

N 

N 

N 


N 

GG 

N 

N 

N 


N 

KK 

N 

N 

N 


Load 

Load Address 
Load and Test 
Load and Test, Long 
Load and Test, Short 


RR 

RX 

RR 

RR, Floating Pt. 

RR, Floating Pt. 




X 
X 






X 
X 




N 

N 

J 

R 

R 


N 
N 
L 
L 
L 


N 
N 

M 
M 
M 


N 

N 


Load Complement 
Load Complement, Long 
Load Complement, Short 
Load Halfword 
Load, Long 


RR 

RR, Floating Pt. 

RR, Floating Pt. 

RX 

RX, Floating Pt. 


X 
X 


X 
X 
X 
X 


F 




X 
X 

X 




P 
R 
R 
N 
N 


L 
L 
L 

N 
N 


M 
M 
M 
N 
N 


O 

N 
N 


Load, Long 
Load Multiple 
Load Negative 
Load Negative, Long 
Load Negative, Short 


RR, Floating Pt. 

RS 

RR 

RR, Floating Pt. 

RR, Floating Pt. 


X 


X 
X 

X 
X 






X 

X 
X 




N 

N 

J 

R 

R 


N 
N 
L 
L 
L 


N 
N 


N 
N 


Load Positive 
Load Positive, Long 
Load Positive, Short 
Load PSW 
Load, Short 


RR 

RR, Floating Pt. 

RR, Floating Pt. 

SI 

RX, Floating Pt. 


X 
X 


X 
X 
X 
X 


F 




X 
X 

X 


A 


J 

R 

R 

QQ 

N 


L 
L 

QQ 
N 


M 

M 

M 

QQ 

N 


O 

QQ 
N 


Load, Short 
Move Characters 
Move Immediate 
Move Numerics 
Move with Offset 


RR, Floating Pt. 

SS 

SI 

SS 

SS 


X 
X 
X 
X 


X 




X 
X 
X 
X 


X 




N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Move Zones 
Multiply 
Multiply 

Multiply Decimal 
Multiply Halfword 


SS 

RX 

RR 

SS, Decimal 

RX 


X 
X 

X 
X 


X 
X 
X 
X 




X 
X 


X 


Data 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


Multiply, Long 
Multiply, Long 
Multiply, Short 
Multiply, Short 
No Operation 


RX, Floating Pt. 
RR, Floating Pt. 
RX, Floating Pt. 
RR, Floating Pt. 
RX,Ext.Mnemonic 


X 
X 


X 
X 
X 
X 


E 
E 
E 
E 




X 
X 
X 
X 


B 
B 
B 
B 


N 
N 
N 
N 
N 


N 
N 
N 
N 
N 


N 
N 
N 

N 
N 


N 
N 
N 
N 
N 



r 



Figure D-2. Machine Instruction Summary (4 of 7) 
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Instruction 


Mnemonic 


Machine 


Operand Format 






Operation 


Operation 










Code 


Code 


Explicit 


Implicit 




No Operation 


NOPR 


07(BCR 0) 


R2 






Or Logical 


O 


56 


Rl,D2(X2 / B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Or Logical 


OC 


D6 


D1(L,B1),D2(B2) 


S1(L),S2 


or S1,S2 


Or Logical 


OR 


16 


R1,R2 






Or Logical Immediate 


Ol 


96 


D1(B1),I2 


SI, 12 




Pack 


PACK 


F2 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Read Direct 


RDD 


85 


D1(B1),I2 


SI, 12 




Set Program Mask 


SPM 


04 


Rl 






Set System Key 


SSK 


08 


R1,R2 






Set System Mask 


SSM 


80 


D1(B1) 


SI 




Shift Left Double Algebraic 


SLDA 


8F 


R1,D2(B2) 


R1,S2 




Shift Left Double Logical 


SLDL 


8D 


R1,D2(B2) 


R1,S2 




Shift Left Single Algebraic 


SLA 


8B 


R1,D2(B2) 


R1,S2 




Shift Left Single Logical 


SLL 


89 


R1,D2(B2) 


R1,S2 




Shift Right Double Algebraic 


SRDA 


8E 


R1,D2(B2) 


R1,S2 




Shift Right Double Logical 


SRDL 


8C 


R1,D2(B2) 


R1,S2 




Shift Right Single Algebraic 


SRA 


8A 


R1,D2(B2) 


R1,S2 




Shift Right Single Logical 


SRL 


88 


R1,D2(B2) 


R1,S2 




Start I/O 


SIO 


9C 


D1(B1) 


SI 




Store 


ST 


50 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Store Character 


STC 


42 


Rl,D2(X2,B2)or R1,D2(,B2 


R1,D2(X2) 


or R1,S2 


Store Halfword 


STH 


40 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


orRl,S2 


Store Long 


STD 


60 


R1,D2(X2,B2) 


R1,S2(X2) 


or R1,S2 


Store Multiple 


STM 


90 


R1,R2,D2(B2) 


R1,R2,S2 




Store Short 


STE 


70 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract 


S 


5B 


R1,D2(X2 


R1,S2(X2) 


or R1,S2 


Subtract 


SR 


IB 


R1,R2 






Subtract Decimal 


SP 


FB 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)orSl,S2 


Subtract Halfword 


SH 


4B 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Logical 


SL 


5F 


Rl,D2(X2,B2)orRl,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Logical 


SLR 


IF 


R1,R2 






Subtract Normalized, Long 


SD 


6B 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Normalized, Long 


SDR 


2B 


R1,R2 






Subtract Normalized, Short 


SE 


7B 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Normalized, 


SER 


3B 


R1,R2 






Subtract Unnormalized, Long 


SW 


6F 


Rl,D2(X2,B2)or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Unnormalized, Long 


SWR 


2F 


R1,R2 






Subtract Unnormalized, Short 


■ SU 


7F 


Rl,D2(X2,B2)or Rl, D2(,B2) 


R1,S2(X2) 


or R1,S2 


Subtract Unnormalized, Short 


SUR 


3F 


R1,R2 






Supervisor Call 


SVC 


0A 


1 






Test and Set 


TS 


93 


D1(B1) 


SI 




Test Channel 


TCH 


9F 


D1(B1) 


SI 




Test I/O 


TIO 


9D 


D1(B1) 


SI 




Test Under Mask 


TM 


91 


D1(B1),I2 


SI, 12 




Translate 


TR 


DC 


D1(L,B1),D2(B2) 


S1(L),S2 


orSl,S2 


Translate and Test 


TRT 


DD 


D1(L,B1),D2(B2) 


S1(L),S2 


orSl,S2 


Unpack 


UNPK 


F3 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 


Write Direct 


WRD 


84 


D1(B1),I2 


SI, 12 




Zero and Add Decimal 


ZAP 


F8 


D1(L1,B1),D2(L2,B2) 


Sl(Ll),S2(L2)or S1,S2 



Figure D-2. Machine Instruction. Summary (5 of 7) 
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Type of 
Instruction 


Program Interruptions 










Instruction 


Possible 






Condition Code Set 




A 


s 


Ov 


P 


Op 


Other 


00 


01 


10 


11 


No Operation 


RR, Ext.Mnemonic 














N 


N 


N 


N 


Or Logical 


RX 


X 


X 










J 


K 






Or Logical 


SS 


X 






X 






J 


K 






Or Logical 


RR 














J 


K 






Or Logical Immediate 


SI 


X 






X 






J 


K 






Pack 


SS 


X 






X 






N 


N 


N 


N 


Read Direct 


SI 


X 






X 


X 


A 


N 


N 


N 


N 


Set Program Mask 


RR 














RR 


RR 


RR 


RR 


Set Storage Key 


RR 


X 


X 






X 


A 


N 


N 


N 


N 


Set System Mask 


SI 


X 










A 


N 


N 


N 


N 


Shift Left Double Algebraic 


RS 




X 


F 








J 


L 


M 


O 


Shift Left Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Left Single Algebraic 


RS 






F 








J 


L 


M 


O 


Shift Left Single Logical 


RS 














N 


N 


N 


N 


Shift Right Double Algebraic 


RS 




X 










J 


L 


M 




Shift Right Double Logical 


RS 




X 










N 


N 


N 


N 


Shift Right Single Algebraic 


RS 














J 


L 


M 




Shift Right Single Logical 


RS 














N 


N 


N 


N 


Start I/O 


SI 












A 


MM 


CC 


EE 


AA 


Store 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Character 


RX 


X 






X 






N 


N 


N 


N 


Store Halfword 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Long 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Store Multiple 


RS 


X 


X 




X 






N 


N 


N 


N 


Store Short 


RX, Floating Pt. 


X 


X 




X 


X 




N 


N 


N 


N 


Subtract 


RX 


X 


X 


F 








V 


X 


Y 


O 


Subtract 


RR 






F 








V 


X 


Y 


O 


Subtract Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


V 


X 


Y 





Subtract Halfword 


RX 


X 


X 


F 








V 


X 


Y 


o 


Subtract Logical 


RX 


X 


X 












W,H 


V,l 


W,l 


Subtract Logical 


RR 
















W,H 


V,l 


W,l 


Subtract Normalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Normalized, Long 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Normalized, Short 


RX, Floating Pt. 


X 


X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Normalized, Short 


RR, Floating Pt. 




X 


E 




X 


B,C 


R 


L 


M 


Q 


Subtract Unnormalized, Long 


RX, Floating Pt. 


X 


X 


E 




X 


C 


R 


L 


M 


Q 


Subtract Unnormalized, Long 


RR, Floating Pt. 




X 


E 




X 


C 


R 


L 


M 


Q 


Subtract Unnormalized, Short 


RX, Floating Pt . 


X 


X 


E 




X 


C 


R 


L 


M 


Q 


Subtract Unnormalized, Short 


RR, Floating Pt. 




X 


E 




X 


C 


R 


L 


M 


Q 


Supervisor Call 


RR 














N 


N 


N 


N 


Test and Set 


SI 


X 






X 






SS 


TT 






Test Channel 


SI 












A 


JJ 


II 


FF 


HH 


Test I/O 


SI 












A 


LL 


CC 


EE 


KK 


Test Under Mask 


SI 


X 












UU 


VV 




WW 


Translate 


SS 


X 






X 






N 


N 


N 


N 


Translate and Test 


SS 


X 












PP 


NN 


OO 




Unpack 


SS 


X 






X 






N 


N 


N 


N 


Write Direct 


SI 


X 








X 


A 


N 


N 


N 


N 


Zero and Add Decimal 


SS, Decimal 


X 




D 


X 


X 


Data 


J 


L 


M 


O 



Figure D-2. Machine Instruction Summary (6 of 7) 
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Program 


Interruptions Possible 


Under Ov: D = Decimal 




E - Exponent 




F = Fixed Point 


Under Other: 




A Privileged Operation 




B Exponent Underflow 




C Significance 




D Decimal Divide 




E Floating Point Divide 




F Fixed Point Divide 




G Execute 


Condition Code Set 


H 


No Carry 


1 


Carry 


J 


Result = 


K 


Result is Not Equal to Zero 


L 


Result is Less Than Zero 


M 


Result is Greater Than Zero 


N 


Not Changed 


O 


Overflow 


P 


Result Exponent Underflows 


Q 


Result Exponent Overflows 


R 


Result Fraction = 


S 


Result Field Equals Zero 


T 


Result Field is Less Than Zero 


U 


Result Field is Greater Than Zero 


V 


Difference = 


W 


Difference is Not Equal to Zero 


X 


Difference is Less Than Zero 


Y 


Difference is Greater Than Zero 


Z 


First Operand Equals Second Operand 


AA 


First Operand is Less Than Second Operand 


BB 


First Operand is Greater Than Second Operand 


CC 


CSW Stored 


DD 


Channel and Subchannel not Working 


EE 


Channel or Subchannel Busy 


FF 


Channel Operating in Burst Mode 


GG 


Burst Operation Terminated 


HH 


Channel Not Operational 


II 


Interruption Pending in Channel 


JJ 


Channel Available 


KK 


Not Operational 


LL 


Available 


MM 


I/O Operation Initiated and Channel Proceeding With its Execution 


NN 


Nonzero Function Byte Found Before the First Operand Field is Exhausted 


OO 


Last Function Byte is Nonzero 


PP 


All Function Bytes Are Zero 


QQ 


Set According to Bits 34 and 35 of the New PSW Loaded 


RR 


Set According to Bits 2 and 3 of the Register Specified by Rl 


SS 


Leftmost Bit of Byte Specified = 


TT 


Leftmost Bit of Byte Specified = 1 


UU 


Selected Bits Are All Zeros; Mask is All Zeros 


VV 


Selected Bits Are Mixed (zeros and ones) 


WW 


Selected Bits Are All Ones 



Figure D-2. Machine Instruction Summary (7 of 7) 
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APPENDIX E: ASSEMBLER INSTRUCTIONS 



Operation 
Entry 



ACTR 






AGO 



AIF 



-+- 



Y 

ANOP 
I 

ccw 

I 

CNOP 



-+ 



j. 

COM 

COPY 
i 

CSECT 

DC 

\ 

DROP 

I 

DS 
I 

DSECT 

EJECT 
END 

I 

ENTRY 



A sequence symbol or not present 
Not used, must not be present 



+ 



Any symbol or not present 

A sequence symbol or not present 



Y 

EQU 
EXTRN 



-f 



I— 



GBLA 



GBLB 



j. 






-+ 



GBLC 



ICTL 



-H 



Name Entry 



Not used, must not be present 



A sequence symbol or not present 



A sequence symbol or not present 



A sequence symbol 

Any symbol or not present 



Operand Entry 

An arithmetic SETA expression 

A sequence symbol 

A logical expression enclosed in 
parentheses, immediately followed by a 
sequence symbol 

Not used, must not be present 



A sequence symbol or not present 



Any symbol or not present 



— + 



Four operands, separated by commas 

Two absolute expressions, separated by 
a comma 

Not used, should not be present 
A symbol 

Not used, should not be present 



+ 



1 

Any symbol or not present 

A variable symbol or an 
ordinary symbol 



One to sixteen absolute expressions, 
separated by commas 



A sequence symbol or not present 

A sequence symbol 
or not present 

A sequence symbol or not present 



A variable symbol or an 
ordinary symbol 



A sequence symbol or not present 



Not used, must not be present 



Not used, must not be present 



Not used, must not be present 



Not used, must not be present 



One operand 



One operand 



Not used, should not be present 



Not used, should not be present 

A relocatable expression 
or not present 

One or more relocatable symbols, sepa- 
rated by commas 

An absolute or relocatable expression 

One or more relocatable symbols, sepa- 
rated by commas 

One or more variable symbols that are 
to be used as SET symbols, separated 
by commas 2 

One or more variable symbols that are 
to be used as SET symbols, separated 
by commas 2 

One or more variable symbols that are 
to be used as SET symbols, separated 
by commas 2 

One to three decimal values, separated 
by commas 
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Page of GC24-3414-7 
Revised August 21, 1970 
By TNL CN33-8087 



H- 



H- 



LCLB 



LCLC 



^ 

LTORG 
MACRO 5 - 

MENDi 



ORG 



Operation 
Entry 



ISEQ 



UCLA 






Not used, must not be present 



+ 



Any symbol or not present 
Not used, must not be present 









MEXIT : 



MNOTE 1 



-+ 






h 

PRINT 

PUNCH 



REPRO 

SETA 

SETB 



SETC 



SPACE 



START 
TITLE 3 



I 

USING 



— +- 



Name Entry 
Not used, must not be present 



Not used, must not be present 



Operand Entry 

Two decimal values, separated by a 
comma 



Not used, must not be present 



A sequence symbol or not present 
A sequence symbol or not present 



A sequence symbol, a variable 
symbol or not present 



-+ 



A sequence symbol or not used 
A sequence symbol or not present 






A sequence symbol or not present 






A sequence symbol or not used 



A SETA symbol 
A SETB symbol 

A SETC symbol 






A sequence symbol or not present 
Any symbol or not present 



A special symbol (0 to 4 charac- 
ters), a sequence symbol, a 
variable symbol, or not present 






A sequence symbol or not present 






One or more variable symbols that are 
to be used as SET symbols, separated 
by commas 2 



One or more variable symbols that are 
to be used as SET symbols, separated 
by commas 2 

One or more variable symbols separated 
by commas 2 

Not used, should not be present 

Not used, should not be present 

Not used, must not be present 

Not used, must not be present 

A severity code, followed by a comma, 
followed by any combination of charac- 
ters enclosed in apostrophes 

A relocatable expression or not used 

One to three operands 

One to eighty characters enclosed in 
apostrophes 

Not used, must not be present 

An arithmetic expression 

A or a 1, or logical expression 
enclosed in parentheses 

A type attribute, a character expres- 
sion, a substring notation, or a con- 
catenation of character expressions 
and substring notations 

A decimal self-defining term or not 
used 

A self -defining term or not used 



One to 100 characters, enclosed in 
apostrophes 



| J WXTRN' 
J 



} A sequence symbol or not present 



An absolute or relocatable expression 
followed by 1 to 16 absolute expres- 
sions, separated by commas 

' One or more relocatable symbols, sepa-i 
[ rated by commas ,| 



i l 



i May only be used as part of a macro definition 



SET symbols may be defined as subscripted SET symbols 
3 See Section 5 for the description of the name entry. 
4 D0S Assembler 14K D only. 
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ASSEMBLER STATEMENTS 



| INSTRUCTION 

Model Statements 3 *» 
(A variable symbol or any 
assembler language mnemonic 
operation code except COPY, 
END, ICTL, ISEQ, and PRINT 



| NAME ENTRY | OPERAND ENTRY | 



Prototype Statement 1 



Macro Instruction 
Statement 1 



An ordinary symbol, variable 
symbol, sequence 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 
to a symbol, or not used 

A symbolic parameter or 
not used 



Assembler Language 
Statement 3 «♦ 



Zero or more operands that 
are symbolic parameters, 
separated by commas, followed 
by zero or more operands 
(separated by commas) of the 
form symbolic parameter, 
equal sign, optional standard 
value 

An ordinary symbol, a 
variable symbol, a sequence 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 
to a symbol, 2 or not used 






Any combination of char- 
acters (including variable 
symbols) 



Zero or more positional 
operands separated by commas, 
followed by zero or more 
keyword operands (separated 
by commas) of the form 
keyword, equal sign, value 3 






i 



An ordinary symbol, a var- 
iable symbol, a sequence 
symbol, a combination 
of variable symbols and 
other characters that is 
equivalent to a symbol, 
or not used 

May only be used as part of a macro definition. 
Variable symbols appearing in a macro instruction are 
replaced by their values before the macro instruction is 
processed. 

Variable symbols may not be used to generate the follow- 
ing mnemonic operation codes: ACTR, COPY, END, ICTL, 
CSECT, DSECT, ISEQ, PRINT, REPRO, and START. Variable 
symbols may not be used in the name and operand entries 
of the following instructions: COPY, END, ICTL, and ISEQ. 
Variable symbols may not be used in the name entry of the 
ACTR instruction. 

The line following a REPRO statement may not contain 
variable symbols. 



Any combination of characters 
(including variable symbols) 
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APPENDIX F: SUMMARY OF CONSTANTS 



TYPE 

AND 

DELIM. 



IMPLIED 

LENGTH 

(BYTES) 



ALIGN- 
MENT 



LENGTH 
MODI- 
FIER 
RANGE 






C " 



as 

needed 



byte 



1 to 
256 (1) 






as 
needed 



byte 



1 to 
256 (1) 






as 
needed 



byte 






F " 



word 



1 to 8 






H " 



1 to 8 






1 to 






1 to 8 






as 
needed 



Z " 



as 
needed 



A () 




+ 



Y () 




SPECIFIED 
BY 



CON- 
STANTS 

PER 
OPERAND 



characters 



hexadecimal 
digits 



binary 
digits 



decimal 
digits 



decimal 
digits 



decimal 
digits 



decimal 
digits 



decimal 
digits 






decimal 
digits 






multiple 



left 



an absolute 
expression 

a relocatable 
or complex 
relocatable 
expression 

relocatable 
symbol 

one absolute 
or relocatab- 
le expression 
or two absol- 
ute express- 
ions: 
exp (exp) 

an absolute 
expression 



one 



one 



one 



multiple 



multiple 



multiple 



multiple 



multiple 



multiple 



multiple 
multiple 



multiple 



RANGE 
FOR EX- 
PONENTS 



-85 to 
+ 75 



-85 to 
+ 75 



-85 to 
+ 75 



-85 to 
+75 



RANGE 

FOR 
SCALE 



TRUN- 
CATION/ 
PADDING 
SIDE 



right 



left 



-187 to 
+346 



-187 
+ 346 



to 14 



to 14 



left 



left 



left 



right 



right 



left 



left 



left 



left 



a relocatable 
or complex 
relocatable 
expression 

(1) In a DS assembler instruction, C and X type constants may have length specification 
to 65535. 
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APPENDIX G: MACRO FACILITY SUMMARY 



The four charts in this appendix summarize 
the macro facility described in Part 2 of 
this publication. 

Figure G-l indicates which macro facility 
elements may be used in the name and oper- 
and entries of each statement. 



Figure G-3 is a summary of the attribut 
that may be used in each expression. 



es 



Figure G-4 is a summary of the variable 
symbols that may be used in each expression. 



Figure G-2 is a summary of the expressions 
that may be used in macro-instruction 
statements. 
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Statement 


Variable Symbols 














Sequence 
Symbol 


Global SET Symbols 


Local SET Symbols 


System Variable Symbols 


Attributes 


Symbolic 
Parameter 


SETA 


SETB 


SETC 


SETA 


SETB 


SETC 


&SYSNDX 


&SYSECT 


iSYSLIST 


Type 


Length 


Scaling 


Integer 


Count 


Number 


MACRO 




































Prototype 
Statement 


Name 
Operand 


































GBLA 




Operand 
































GBLB 






Operand 






























GBLC 








Operand 




























LCLA 










Operand 


























LCLB 












Operand 
























LCLC 














Operand 






















Model 
Statement 


Name 

Operation 

Operand 


Name 

Operotion 

Operand 


Name 

Operotion 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Nome 

Operation 

Operond 


Name 

Opeiation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Nome 

Operotion 

Operand 














Name 


COPY 


































Name 


SETA 


Operand 2 


Name 
Operand 


Operand 3 


Operand 9 


Name 
Operand 


Operond 3 


Operand 9 


Operand 




Operand 2 




Operand 


Operand 


Operand 


Operand 


Operond 




SETB 


Operand 6 


Operand 4 


Name 
Operand 


Operand 4 


Operand 6 


Name 
Operand 


Operand 6 


Operand 6 


Operand 4 


Operand 6 


Operand 4 


Operand 5 


Operand 5 


Operand 5 


Operand 5 


Operand 5 




SETC 


Operand 


Operand 7 


Operand 8 


Name 
Operand 


Operand 7 


Operona 8 


Name 
Operand 


Operand 


Operond 


Operand 


Operand 














AIF 


Operand 4 


Operand 6 


Operand 


Operand 6 


Operand 


Operond 


Operand 6 


Operand 6 


Operand 4 


Operand 6 


Operand 4 


Operand 5 


Operand 5 


Operand 


Operand 5 


Operand 5 


Name 
Operand 


AGO 


































Operand 


ACTR 


Operand 


Operand 


Operand 3 


Operand 2 


Operand 


Operand 3 


Operand 2 


Operand 




Operand 2 




Operond 


Operand 


Operand 


Operand 


Operand 




ANOP 


































Name 


MEXIT 


































Name 


MNOTE 


Operand 


Operand 


Operand 


Operand 


Operand 


Operond 


Operond 


Operond 


Operand 


Operand 














Name 


MEND 


































Name 


Outer 




Name 
Operand 


Name 
Operand 


Name 
Operand 


Operand 


Name 
Operand 


Name 
Operand 




















Name 


Macro 


Name 
Operand 


Name 
Operand 


Operand 


Name 
Operand 


Name 
Operand 


Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 


Name 
Operand 














Name 


Assembler 
Language 
Statement 




Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 


Name 

Operotion 

Operand 


Name 

Operation 

Operand 


Name 

Operation 

Operand 




















Name 


1 . Variable symbols in macro-instructions are replaced by their values before processing. 

2. Only if value is self-defining term. 

3. Converted to arithmetic -1 or ^0. 

4. Only in character relations. 

5. Only in arithmetic relations. 

6. Only in arithmetic or character relations. 

7. Converted to unsigned number . 

8. Converted to character 1 or 0. 

9. Only if one to eight decimal digits. 



Figure G-l. Macro Facility Elements 
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I Expression | Arithmetic Expressions | character Expressions | Logical Expressions! 



Operators 
are 



May 
contain 



Range 

of values 

May be 
used in 



1. Self -defining terms 

2. Length, scaling, 
integer, count, and 
number attributes 

3. SETA and SETB symbols 

4. SETC symbols whose 
value is 1-8 decimal 
digits 

5- Symbolic parameters 
if the corresponding 
operand is a self- 
defining term 
SSYSLIST(n) if the 
corresponding operand 
is a self- defining 
term 

SSYSLIST(n,m) if the 
corresponding operand 
is a self-defining 
term 
SSYSNDX 



6. 



7. 



8 



+»-#*# and / 

parentheses permitted 



-2 31 to +231-1 



through 127 (255 for 
assembler F) characters. 



1. SETA operands 

2. Arithmetic relations 

3. Subscripted SET 
symbols 

4. 6SYSLIST 

5. Substring notation 

6. Sublist notation 

7. SETC operands 



8. ACTR operands 



1. Any combination of 
characters enclosed 
in apostrophes 

2. Any variable symbol 
enclosed in apos- 
trophes 

3. A concatenation of 
variable symbols and 
other characters 
enclosed in apos- 
trophes 

4. A request for a type 
attribute. 



concatenation 
period (.) 



with a 



AND, OR, and NOT 
parentheses per- 
mitted 



1. SETC operands 3 

2. Character relations 2 

3. SETA operands 1 * 



1. SETB symbols 

2. Arithmetic re- 
lations x 

3. Character re- 
lations 2 



(false) or 

1 (true) 

1. SETB operands 

2. AIF operands 



An arithmetic relation consists of two arithmetic expressions related by the opera- 
tors GT, LT, EQ, NE, GE, or LE. 

A character relation consists of two character expressions related by the operator 
GT, LT, EQ, NE, GE, or LE. The type attribute notation and the substring notation 

may also be used in character relations. The maximum length of the character 

expressions that can be compared is 127 (255 for assembler F) characters. If the 

two character expressions are of unequal length, then the shorter one will always 

compare less than the longer. 

Maximum of eight characters will be assigned. 

If one to eight decimal digits. 



Figure G-2. Expressions 
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Attribute 



I 

Type 



Length 



Scaling 



Integer 



Count 



Notation 

4 

T . 



— T - 



L* 



S' 



Number 



I* 



-| 



-+— 



N» 



May be used with: 



— T" 



Symbols outside 
macro-definitions ; 
symbolic parameters, 
SSYSLlST(n), and 
&SYSLIST(n,m) inside 
macro-definitions 

Symbols outside 
ma cro- def init ions ; 
symbolic parameters, 
SSYSLISTCn), and 
6SYSLIST(n,m) inside 
ma cro- definitions 

Symbols outside 
ma cro- def init ions ; 
symbolic parameters, 
SSYSLIST(n), and 
6SYSLIST ( n, m) inside 
macro-definitions 



May be used only if 
type attribute is: 

(May always be used) 






Any letter except 
M,N,0,T, and U 



H,F,G,D,E,K,P, and Z 



Symbols outside 
ma cro- def init ions ; 
symbolic parameters, 
SSYSLIST(n), and 
SSYSLIST(n,m) inside 
ma cro- definitions 

Symbolic parameters 
corresponding to 
macro-instruction 
operands, SSYSLIST 
(n), and £SYSLIST(n,m) 
inside macro- 
definitions 






Symbolic parameters, 
6SYSLIST, and 
6SYSLIST(n) inside 
ma cro- def init ions 



Arithmetic 
expressions 



H,F,G,D,E,K,P, and Z 



Any letter 



Any letter 



May be used in 



1- SETC operand 
fields 

2- Character 
relations 
(SETB) 



Arithmetic 
expressions 









Arithmetic 
expressions 



Arithmetic 
expressions 






Arithmetic 
expressions 






Figure G-3. Attributes 
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-S 



Variable 
symbol 
I 



SETB 



SETC 



Symbolics- 
parameter 



SETA 



Prototype 
statement 



■+— ■ 
|LCLA or GBLA 
instruction 

|LCLB or GBLB 
instruction 






j. 

SSYSNDX 1 



J. 

6SYSECT* 



6SYSLIST 1 



SSYSLIST(n)*- 
&SYSLIST(n,m)*- 



Defined by: 



Initialized, 
or set to: 






LCLC or GBLC 
instruction 



The assembler 



The assembler 



The assembler 



-f 



The assembler 






Corresponding 
macro- instruction 
operand 



Value changed 
by: 



Null character 
value 



Macro- instruction 
index 



Control section 
in which macro- 
instruction 
appears 






Not applicable 



Corresponding 

macro-instruction 

operand 



_+_ 



(Constant 

throughout 

definition) 



SETC 
instruction 



SETA 
instruction 

I SETB |1. Arithmetic expressions 

instruction | 2. Character expressions 
3. Logical expressions 

1. Arithmetic expressions 
if value is one to 
eight decimal digits 

2. Character expressions 

(Constant 
throughout 
definition; 
unique for 
each macro- 
instruction) 

(Constant 
throughout 
definition; 
set by CSECT, 
DSECT, and 
START) 

Not applicable 






-+ 



May be used in: 



■H 



1- Arithmetic expressions 
if operand is self- 
defining term 

2. character expressions 



1. Arithmetic expressions 

2. Character expressions 



1. Arithmetic expressions 
2- Character expressions 



Character expressions 



N'SSYSLIST in arithmetic 
expressions 



, x May only be used in macro-definitions. 
Figure G-4. Variable Symbols 



(Constant |1. Arithmetic expressions 
throughout | if operand is self- 
definition) I defining term 

2. Character expressions 



r 
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APPENDIX H: DICTIONARY AND SOURCE STATEMENT SIZES 



PART 1; DICTIONARIES USED IN MACRO GENERATION 

A. Dictionaries at Collection Time 

Two or more dictionaries must be constructed to enable the macro generator portion 
of the assembler to accomplish macro generation and conditional assembly: a global 
dictionary and one or more local dictionaries. 

Global Dictionary 

A global dictionary containing macro instruction mnemonics and global SET variable 
names is built for the entire program. Dictionary entries are fitted into blocks 
of fixed size, 256 bytes for Assembler (D) and 1024 bytes for Assembler (F) . 

Each block contains complete entries. If an entry cannot fit into the remainder 
of one block, it is put into the next block and bytes in the remainder are not 
used. The sizes of various kinds of dictionary entries are as follows: 



Macro Mnemonic Operation Code 
Global SET Variable Name 

Fixed Overhead 



10 bytes plus mnemonic* 

6 bytes plus name* (A dimensioned 
global SET variable is counted only 
once) 

8 bytes for first block 

4 bytes for each succeeding block 

5 bytes for last block 



The maximum size of the global dictionary depends on the size of the partition 
and can be no greater than 64 blocks. Maximum dictionary sizes for Assembler (D) 
variants in the smallest possible partitions are as follows (in bytes) : 



V 





Partition 


size 


! 10K 


12K 


14K 


16K | 


i DOS Assembler 


(D) variant 












i 10K with tape 


work files 




! 512 


1024 


1536 


2048 j 


} 10K with disk 


work files 




• 512 


1024 


1536 


15 36 j 


| 14K 






| 




1024 


15 36 1 



An additional limitation on dictionary size is that the maximum number of distinct 
global symbols is 400. 



* One byte is used for each character in the name or mnemonic. 
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V J 



Local Dictionary 

A local dictionary containing ordinary symbols relevant to macro generation and 
conditional assembly, sequence symbols and local SET variable names is constructed 
for the main portion of the program. In addition, a local dictionary containing 
an entry for each local SET variable name, sequence symbol and prototype symbolic 
parameter declared within a macro definition is constructed for each different 
macro definition used in the program. Dictionary entries are fitted into blocks 
of fixed size, 256 bytes for Assembler (D) and 1024 bytes for Assembler (F) . 

Each block contains complete entries. If an entry cannot fit into the remainder 
of one block, it is put into the next block and bytes in the remainder are not 
used. The sizes of various kinds of dictionary entries are as follows: 



Sequence Symbol Names 



Local SET Variable Names 



10 bytes plus name * (A reference to 
sequence symbols after definition, 
a backwards branch, causes an 
additional entry to be made in the 
local dictionary.) 

6 bytes plus name * (A dimensioned 
local SET variable is counted only 
once. ) 



Prototype Symbolic Parameters 

Relevant ordinary symbols 
appearing in the main 
portion of the program 

Fixed Overhead 



5 bytes plus name * 
10 bytes plus name * 



8 bytes for first block (32 bytes 
if a macro local dictionary) 

4 bytes for each succeeding block 

5 bytes for last block 



One byte is used for each character in the name or mnemonic, 



The maximum size of a local dictionary depends on the size of the partition and 
can be no greater than 64 blocks. Maximum dictionary sizes for DOS Assembler (D) 
variants in the smallest possible partitions are as follows (in bytes) : 





——_______^ Partition size 


10K 


12K 


14K 


16K } 


i DOS Assembler 


(D) variant _______^ 










[ 10K with tape 


work files 


1536 


2048 


2816 


3072 j 


| 10K with disk 


work files 


1024 


1536 


2304 


3072 J 


i 14K 








2048 


2304 i 



o 
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Dictionaries at Generation Time 

To conserve storage during the actual conditional assembly and macro generation, the 
contents of the Global Dictionary and Local Dictionaries are restructured as follows: 



Global Dictionary 

Fixed overhead 

Macro Mnemonic Operation Code 

Global SETA dimensioned 

Global SETA undimensioned 

Global SETB dimensioned 

Global SETB undimensioned 
Global SETC dimensioned 
Global SETC undimensioned 



4 bytes plus word alignment 

3 bytes 

1 byte plus UN 

4 bytes 

1 byte plus (N/8) 

[N/8 is rounded to the next highest integer] 

1 byte 

1 byte plus 9N 

9 bytes 



r 



Local Dictionary 
Fixed overhead 

Sequence Symbols 

Local SETA dimensioned 
Local SETA undimensioned 
Local SETB dimensioned 

Local SETB undimensioned 
Local SETC dimensioned 
Local SETC undimensioned 



20 bytes plus word alignment for the F assembler 
27 bytes plus word alignment for the D assembler 

5 bytes (when the size of the dictionary (see below) 
is less than 3000, only the first 40 symbols will 
require 5 bytes each) 

1 byte plus UN 

4 bytes 

1 byte plus (N/8) 

[N/8 is rounded to the next highest integer] 

1 byte 

1 byte plus 9N 

9 bytes 



Relevant ordinary symbols appearing 

in the main portion of the program 5 bytes 

(see Note) 

N = dimension 

Note ; For the D assembler, only those ordinary symbols which appear in macro instruction 
operands are included in this table*, for the F assembler, all ordinary symbols are 
included. As a result, the F assembler may overflow the Local Dictionary before the D 
assembler. 

The restructured Global Dictionary and the restructured Local Dictionary for the 
main portion of the program must be resident in main storage. 

In addition, if the program contains any macro instructions, main storage is 
required for the largest Local Dictionary of the macro definitions being processed. 
Furthermore, if any macro definitions contain inner macro instructions, main storage 
is required for all the restructured Local Dictionaries of all the macros in the 
nest. 
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In addition to those requirements specified above for the Local Dictionary of the main 
portion of the program, each macro definition Local Dictionary requires the following 
for the parameter table: 



1. Fixed Overhead 

2. Table Entries 

a. Character string 

b. Hexadecimal, binary, 
decimal, and character 
self-defining values 

c. Symbol 

d. Sublist 



22 bytes 



3 bytes plus L 



7 bytes plus L 
9 bytes plus L 
10 bytes plus 2N bytes plus Y 



L=Length of entry 

N=Number of entries in sublist 

Y=Total length of table entries of a., b., and c. formats 

Each nested macro instruction also requires the following: 

Parameter pointer list 2 bytes plus 2N (N = the number of operands) 

Pointers to list in table 8 bytes plus word alignment 

The size of the dictionary depends on the partition size and the assembler variant 
used. Maximum dictionary sizes for Assembler (D) variants in the smallest possible 
partitions are as follows (in bytes) : 



| ' -~—_ Partition 


size 




10K 


| 12K 


14K 


16K 


i DOS Assembler (D) variant 














i 10K with tape work files 






2050 


3100 


4150 


5000 


| 10K with disk work files 






1500 


2400 


3600 


4400 


j 14K 






- 


- 


2750 


3800 



PART 2: MACRO MNEMONIC TABLE (D ASSEMBLER ONLY) 

As the source text is scanned, a table of macro mnemonics is constructed. There is an 
entry for each macro used or defined as a programmer macro in the program. The entries 
are made under the premise that every undefined operation is a system macro mnemonic. 
This table is then subsetted to locate and edit system macros from the library. 



An entry in this subsetted table consists of 9 bytes. With 10,240 or 14,336 contigu- 
ous bytes of main storage available (see Machine Features Required ) approximately 450 
distinct macro mnemonics can be handled. When this table overflows, processing continues 
with only those macros defined at that point. If additional storage is available, this 
table is expanded accordingly. 
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PART 3: SOURCE STATEMENT COMPLEXITY - CONDITIONAL ASSEMBLY AND MACRO GENERATION 

) For any statement except macro prototype or macro instructions, a counter is increased by 
^■" y one for each literal occurrence of the following: 



1. Ordinary Symbol 

a. Name, operation, or operand entry (when the operand count starts, the counter 
is decremented by one) , or 

b. Operand of an EXTRN or WXTRN statement, or 

c. Operand of an attribute operator (L* ,T»,I*, etc. in a SETA, SETB or SETC 
expression, or 

d. operand of a machine or assembler instruction (only if in the main portion of 
the program) 

2. Variable Symbol 

3. Sequence Symbol 

Note 1 : The maximum value the counter may attain is 35 for the D assembler and 50 
for the F assembler. 

Note 2 : This restriction applies to the name and operation entry of a macro instruction 
or prototype taken as a unit. Each macro instruction or prototype operand (in sublist, 
each sublist operand) is also subject to the counter restriction. 

Examples of counts: 



o 
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1. SB2 SETB (T'NAME EQ/W f OR •gC'.'A* EQ'AA*) 

count=3 

2. EXTRN A, B, C, 6C 
count=4 

PART 4 ; SOURCE STATEMENT COMPLEXITY - ASSEMBLER STATEMENTS 

A. D Assembler 

With 10,240 or 14,336 contiguous bytes of main storage available (see Machine Features 
Required ), the size of any statement must be less than a certain limit. This limit is: 

1. 727 bytes for DC or DS statements. 

2. 743 bytes for all other statements. 

There are two formulas used to estimate the size (in bytes) of a statement. The greater 
of the two calculated values (S x or S 2 ) determines whether the statement is less than the 
given limit. In general, all statements can be processed if they contain 50 or fewer 
terms. If a statement contains more than 50 terms, the formulas should be used to deter- 
mine if the statement can be processed, or if the statement should be shortened using EQU 
assembler instructions. (In the example for S lf if A+(B-C)*3 were equated to a symbol, 
that symbol could be used as the displacement field of the first operand.) The formulas 
for statement size, S x and S 2 , follow. 

S X = N B +N D +4(N LS +N SD )+6(N S +N L ) 

N. B = the total number of bytes in name, operation, operand, and comments entries. 
(The maximum value of N B is 187.) 

N D = the number of operators and delimiters in the operand entry [except equal (=), 
period (.), and apostrophe (')] 

N LS = the number of references to length attribute (L* SYMBOL), 

N SD = the number of self -defining terms, 

N s = the number of symbolic terms (including *) , 

Ml = the number of literal operands. (The maximum is 1. ) 
Example: 

NAME MVC A+ (B-C) *3(L'D,5) ,=15CL5 ' ABCDEFG* 
S 1 =3 9+9+4(H-4)+6(3+l) 
=92 bytes 

S 2 = N B + 9 (Wi + W 2 + +W i +N E )+N ED 

N B = the total number of bytes in name, operation, operand, and comments entries. 
(The maximum value of N B is 187). 

Wi+W 2 + W^ = a weight associated with the 1st, 2nd, ,i expression. 

Wj_ = 1, if the expression is: 

a. absolute, 

b. simply relocatable, or 

c. in error. 

If the expression is complexly relocatable, W j_ depends on the number of 
unpaired control section numbers (N ESD ). 

INesd T--i-\ 

U I i 

|2, 3, 4, or 5 | 2 
| 6, 7, 8, or 9 | 3 
|10, 11, 12, or 13| 4 
|14, 15, or 16 | 5 
l J. J 
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N = the number of expressions. 

N ED = tne number of expression delimiters. 

The rules for counting the number of expressions (N E ) and the number of expression delim- ' 
iters (Ned> are: 



1. Expression delimiters are commas and the terminating blank of an operand. 

2. Left and right parentheses can be part of an expression or can be expression delimi- 
ters. A left or right parenthesis is an expression delimiter if it ends an expres- 
sion. Otherwise, it is part of an expression. 

Example I t The operand is: 

5,6, A+20*B(6,7) 

The expression delimiters are the three commas, the left parenthesis [ (] , the 
right parenthesis [)], and the terminating blank. 

The first, second, fourth, and fifth expressions all have a weight of 1. The 
third expression in the operand [A+20+B] has a weight of 1 (either B is abso- 
lute, making the result absolute or simply relocatable or, B is relocatable 
so the expression is in error. 

S a = N B + 9^ + W 2 + W 3 + W 4 + W 5 + N E ) + N ED 

S 2 = N B +9(l+l + l + l + l+5)+6 

S2 = N B + 96 bytes 

Example 2 : The operand is: 

A+17*(C-D), (A+20) 

The number of expressions (N E ) is 2. The first expression is A+17*(C-D). 
The second expression is (A+20). 

The number of expression delimiters (N ED ) is 2 (the comma and the terminating 
blank) . 

Example 3 : The operand is: 

20(5, 3), 16(5) 

There are 5 expressions and 7 expression delimiters. 



Expression 1 = 20 
Expression 2 = 5 
Expression 3 = 3 
Expression 4 = 16 
Expression 5 = 5 



B. F Assembler 



Expression Delimiter 1 = ( 
Expression Delimiter 2 = 
Expression Delimiter 3 = 
Expression Delimiter 4 = 
Expression Delimiter 5 = 
Expression Delimiter 6 = 
Expression Delimiter 7 = blank 



1. Generated statements may not exceed 272 characters. Statement length includes 
name, operation, operand, and comments. If a comments field exists, the blank 
separating the operand and the comments field is included in the statement 
length. The statement is truncated if it exceeds 272 characters. 

2. DC, DS and literal DCs cannot contain more than 32 operands per statement. 
PART 5 : PRINT CONTROL STATEMENT LISTING RESTRICTIONS 



TITLE, SPACE and EJECT statements will not appear in the source listings unless the state- 
ment is continued onto another card. Then the first card of the statement will be listed. 
If any of these three statements are generated by macro expansion, they will not be listed 
(regardless of continuation) if the current PRINT option is NOGEN. 
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APPENDIX I: SAMPLE PROGRAM AND ASSEMBLER LISTING DESCRIPTION 



The assembler listing consists of five 
sections, ordered as follows: external 
symbol dictionary items; the source and 
object program statements; relocation 
dictionary items; symbol cross-reference 



table; and diagnostic messages. 

The following sample program illustrates 
an actual assembler listing. Several 
errors have been included to show their 
effect on an assembly. 



Given: 

1. A TABLE with 15 entries, each 16 bytes long, having the following format: 

r t t t 1 

I NUMBER of items j SWITCHes | ADDRESS j NAME | 
L J. JL L J 

3 bytes 1 byte 4 bytes 8 bytes 

2. A LIST of items, each 16 bytes long, having the following format: 

r t t t T 

j NAME | SWITCHes | NUMBER of items j ADDRESS | 

8 bytes 1 byte 3 bytes 4 bytes 

Find: Any of the items in the LIST which occur in the TABLE and put the SWITCHes, 

NUMBER of items, and ADDRESS from that LIST entry into the corresponding TABLE 
entry. If the LIST item does not occur in the TABLE, turn on the first bit in 
the SWITCHes byte of the LIST entry. 

The TABLE entries have been sorted by their NAME. 
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©© © © {*) 

SYMBOL TYPE ID ADDR LENGTH LD ID 



PC 01 000000 0001C0 
SEARCH LO 000026 01 



EXTERNAL SYMBOL DICTIONARY 



PAGE 



EXTERNAL SYMBOL DICTIONARY (ESP) 



This section of the listing contains the 
external symbol dictionary information 
passed to the linkage-editor in the object 
module. The entries describe the control 
sections, external references, and entry 
points in the assembled program. There are 
five types of entries, shown along with 
with their associated fields. The circled 
numbers refer to the corresponding head- 
ing in the sample listing. 



r"©""T""©"T"0T"(»)"T"(=)""!"0"! 

| SYMBOL | TYPE J ID | ADDR | LENGTH | LDID| 

| X | SD | X | X | X 
L __. 

I x 
I x 



(V)This column contains symbols that appear \ J 

in the name field of CSECT or START state- 
ments, as operands of ENTRY, EXTRN, and 
WXTRN statements, or in the operand field 
of V-type address constants. 



© 



| LD | - | X | 

| ER | X | - | 

| PC | X | X | X 

CM I X j X | X 
X J. JL 



+ \ 

I - I 



X 



WX 



X 



I 



The X indicates entries accompanying 
each type designation. 

; J 



^jThis column contains the type designator 
for the entry, as shown in the table. 
The type designators are defined as: 

SD — names section definition. The 
symbol appeared in the name 
field of a CSECT or START state- 
ment . 

LD — The symbol appeared as the oper- 
and of an ENTRY statement. 

ER — external reference. The symbol 
appeared as the operand of an 
EXTRN statement, or was defined 
as a V-type address constant. 

PC — unnamed control section defini- 
tion. 

CM — common control section defini- 
tion. 

WX — weak external reference. The symbol 
appeared as the operand of a WXTRN 
statement. 

Q^/rhis column contains the external symbol 
dictionary identification number (ID). 
The number is a unique two digit hexa- 
decimal number identifying the entry. 
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f "\ 



© 


© 












© 


EXAM 


SAMPLE PROGRAM 












PAGE 1 


® 


© © 


© 




© 




© 


© 


LOC 


OBJECT CODE ADDR1 AD11R2 


STMT 

2 

3 
4 
5 


SOURCE STATEMENT 




DOS CL3- 


09/16/67 

a. CAM iJl A l~\ 1 






• 


THIS IS THE MACRO DEFINITION 






* j Anr L UU L 

* SAM^L002 
m, camoi nr\ a 








MACRO 






SAMPL004 






6 




MOVE CTO.tFROM 






SAMPLOOb 






7 


. • 








SAMPL006 






8 


. » 


DEFINE SETC SYMBOL 






SAMPL00 7 






9 


.» 








SAMPL003 






10 




LCLC {.TYPE 






SAMPL009 






11 


.» 








SAMPL010 






12 


. • 


CHECK NUMBER OF OPERANDS 






SAMPLOll 






13 


. • 








SAMPL012 






14 




AIF (N'CSYSLIST NE 2).ERR0R1 






SAMPL013 






15 


. • 








SAMPL014 






16 


. • 


CHECK TYPE ATTRIBUTES OF OPERANDS 






SAMPLOll 






17 


.» 








SAMPL016 






18 




AIF (T'GTO NE T' CFROM) . ERR0R2 






SAMPL0L7 






19 




AIF (T'GTO EQ 'C OR T'CTO EQ »G' OR T'GTO EO 


K' ) 


.TYPECGK 


SAMPL018 






20 




AIF (T'GTO EQ 'D' OR T'GTO EQ 'E' OR T'GTO EQ 


H' ) 


.TYPEDEH 


SAMPL019 






21 




AIF (T'GTO EQ 'FM.MOVE 






SAMPL020 






22 




AGO .ERR0R3 






SAMPL021 






23 


.TYPEDEH ANOP 






SAMPL022 






24 


• * 








SAMPL023 






25 


• * 


ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 






SAMPL024 






26 


.» 








SAMPL025 






27 


tTYPE 


SETC T'CTO 






SAMPL026 






28 


.MOVE 


ANOP 






SAMPL02J 






29 


• 


NEXT TWO STATEMENTS GENERATED FOR MOVE MACRO 






SAMPL028 






30 




LGTYPE 2 t 6FR0M 






SAKPL029 






31 




STGTYPE 2tGT0 






SAMPL030 






32 




MEXIT 






SAMPL051 






33 


. • 








SAMPL032 






34 


• * 


CHECK LENGTH ATTRIBUTES OF OPERANDS 






SAMPL033 






35 


a * 








SAMHL034 






36 


TYPECGK 


AIF (L'GTO NE L'GFROM OR L'GTO GT 256J.ERR0R4 






SAMPL03!) 




••• ERROR •»• 


















37 


• 


NEXT STATEMENT GENERATED FOR MOVE MACRO 






SAMPL036 






38 




MVC GTO.GFROM 






SAMPL037 






39 




MEXIT 






SAMPL0J8 






40 


. » 








SAMPL039 






41 


.* 


ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 




SAMPL040 






42 


. # 








SAMPL041 






43 


.ERR0R1 


MNOTE 1, 'IMPROPER NUMBER OF OPERANDS, NO STATEMENTS 


GENERATED 


' SAMPL042 






44 




MEXIT 






SAMPL043 






45 


.ERR0R2 


MNOTE I, 'OPERAND TYPES DIFFERENT, NO STATEMENTS 


GENERATED' 


SAMPL044 






46 




MEXIT 






SAMPL045 






47 


.ERR0R3 


MNOTE 1,' IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED' 


SAMHL046 






48 




MEXIT 






SAMPL047 






49 


•ERR0R4 


MNOTE 1,' IMPROPER OPERAND LENGTHS, NO STATEMENTS 


GENERATED' 


SAMPL048 






50 




MEND 






SAMPL049 



It is used by the LD entry of the ESD 
and by the relocation dictionary to 
cross reference to the ESD. 



© 



*♦ JThe column contains the address of the 
symbol (hexadecimal notation) for SD and 
LD type entries, and zeros for ER and WX 
type entries. For PC and CM type entries, 
it indicates the beginning address of the 
control section. 



SOURCE AND OBJECT PROGRAM 



This section of the listing documents 
the source statements and the resulting 
object program. 



© 



© 



© 



7 'This is the deck identification. It is 
the symbol that appears in the name 
field of the first TITLE statement. 

(jOThis is the information taken from the 
operand field of a TITLE statement. 



This column contains the assembled 
length, in bytes, of the control section 
(hexadecimal notation). 



(^Listing page number. 



i±o) This column contains the assembled 
address (hexadecimal notation) of the 
object code. 



6 'This column contains, for LD type 
entries, the identification (ID) number 
assigned to the ESD entry that identi- 
fies the control section in which the 
symbol was defined. 



© 



f ij This column contains the object code 
produced by the source statement. The 
entries are always left- justified. The 
notation is hexadecimal. Entries are 
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EXAM 




SAMPLE PROGRAM 
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© 




© 


© 


© 




© 




© 


© 


LOC 


OBJECT CODE 


A00R1 


ADDR2 


STMT 

52 
53 
54 
55 


SOURCE STATEMENT 


DOS CL3-0 


09/16/67 

SAMPL050 
SAMPL051 
SAMPL052 
SAMPL053 












• 


MAIN 


ROUTINE 


• 


000000 












CSECT 
















56 




ENTRY 


SEARCH 




SAMPL054 


000000 


05C0 








57 


BEGIN 


BALR 


R12.0 


ESTABLISH ADDRESSABILITY OF PROGRAM 


SAMPL055 


000002 










58 




USING 


♦,R12 


AND TELL THE ASSEMBLER 


SAMHL056 


000002 


9857 


C1A6 




001A8 


59 




LM 


R5,R7,=A<LISTAREA,16,LISTEND1 LUAD LIST AREA PARAMS 


SAMPL057 


000000 










60 




USING 


LIST.R5 


REGISTER 5 POINTS TO THE LIST 


SAMPL058 


00000 6 


45E0 


C024 




00026 


61 


MORE 


BAL 


R14, SEARCH 


FIND LIST ENTRY IN TABLE 


SAMPL059 


00000A 


9180 


C022 


00024 




62 




TM 


SWITCH, NONE 


CHECK TO SEE IF NAME WAS FOUND 


SAMPL060 


00000E 


4710 


C018 




0001A 


63 




BO 


NOTTHERE 


BRANCH IF NOT 


SAMPL061 


000000 










64 
65 




USING 
MOVE 


TABLE, Rl 
TSWITCH.LSWITCH 


REGISTER 1 NOW POINTS TO TABLE ENTRY 
MOVE FUNCTIONS 


SAM PL 062 
SAMPL063 




••• ERROR ••» 


























66 






1, IMPROPER OPERAND 


TYPES, NO STATEMENTS GENERATED 














67 




MOUE 


TNUMBER.LNUMBER 


FROM LIST ENTRY 






••* ERROR •»• 


























68 




MOVE 


TADDRESS.LADDRESS 


TO TABLE ENTRY 


SAKPL069 












69+ 


• 


NEXT 


TWO STATEMENTS GENERATED FOR MOVE MACRO 




000012 


5820 


500C 




OOOOC 


70 + 




L 


2,LADDRESS 






000016 


5020 


1004 




00004 


71 + 




ST 


2.TADDRESS 






00001A 


9680 


5008 


00008 




72 


NOTTHERE 01 


LSWITCH.NONE 


TURN ON SWITCH IN LIST ENTRY 


SAMPL0/5 


00001E 


8756 


C004 




00006 


73 
74 




BXLE 
EOJ 


R5,R6,M0RE 


LOOP THROUGH THE LIST 

END OF PROGRAM, USER LIBRARY MACRO 


SAMPL076 
SAMPL077 












75 + 


» 360N- 


-CL-453 


EOJ CHANGE LEVEL 3-0 




000022 


OAOE 








76+ 




SVC 


14 






000024 










77 


SWITCH 


DS 


X 




SAMFL078 


000080 










78 
79 
80 
81 


NONE 


EQU 


X'80' 




SAMPL079 
SAMPL080 
SAMPL081 
SAMPL082 












• 


BINARY SEARCH ROUTINE 


• 


000025 


00 
















000026 


947F 


C022 


00024 




82 


SEARCH 


NI 


SWITCH, 255-NONE 


TURN OFF NOT FOUND SWITCH 


SAMPL083 


00002A 


9813 


C1B2 




001B4 


83 




LM 


Rl,R3,=F'128,4,128 


LOAD TABLE PARAMETERS 


SAMPL084 


00002E 


4111 


C046 




00048 


84 




LA 


R1,TABLAREA-16(R1) 


GET ADDRESS OF MIDDLE ENTRY 


SAMPL035 


000032 


8830 


0001 




00001 


85 


LOOP 


SRL 


R3,l 


DIVIDE INCREMENT BY 2 


SAMPL086 


000036 


D507 


5000 1008 


00000 


00008 


86 




CLC 


LNAME,TNAME 


COMPARE LIST ENTRY WITH TABLE ENTRY 


SAMPL087 


00003C 


4720 


C04A 




0004C 


87 




BH 


HIGHER 


BRANCH IF SHOULD BE HIGHER IN TABLE 


SAMPL088 


000040 


078E 








88 
89 




BCR 
SR 


8.R14 
R1.R3 


EXIT IF FOUND 

OTHERWISE IT IS LOWER IN THE TABLE 


SAMPL089 
XSAMPL090 


000042 


1B13 
















SO SUBTRACT INCREMENT 


SAMPL091 


000044 


4620 


C030 




00032 


90 


MORE 


BCT 


R2.L00P 


LOOP 4 TIMES 


SAMPL092 




••• ERROR »» 


» 
















000048 


471-0 


C050 




00052 


91 




B 


NOTFOUND 


ARGUMENT IS NOT IN THE TABLE 


SAMPL09J 


00004C 


1A13 








92 


HIGHER 


AR 


R1.R3 


ADD INCREMENT 


SAMPL094 


00004E 


4620 


C030 




00032 


93 




BCT 


R2.L00P 


LOOP 4 TIMES 


SAMPL095 


000052 


9680 


C022 


00024 




94 


NOTFOUND 01 


SWITCH, NONE 


TURN ON NOT FOUND SWITCH 


SAMPL096 


000056 


07FE 








95 




BR 


R14 


EXIT 


SAMPL097 



machine instructions or assembled con- 
stants. Machine instructions are print- 
ed in full with a blank inserted after 
every four digits (two bytes) . Con- 
stants may be only partially printed 
(see the PRINT assembler instruction in 
Assembler Instruction Statements) . 

^3) These two columns contain effective 
addresses (the result of adding together 
a base register value and displacement 
value) : 

1. The column headed ADDR1 contains the 
effective address for the first 
operand of an SS or an SI instruction, 

2. The column headed ADDR2 contains the 
effective address of the second 
operand of any instruction referenc- 
ing storage. 

Both address fields contain six digits; 
however, if the high order digit is a zero, 
it is not printed. 



fi) 



(13) This column contains the statement num- 
ber. A plus sign (+) to the right of 
the number indicates that the statement 
was generated as the result of macro- 
instruction processing. The maximum 
statement number is 65,535. If there 
are more than 65,535 statements, the 
statement number wraps-around. 



(x*») This column contains the source program 
statement. The following items apply to 
this section of the listing: 

a. Source statements are listed, 
including those brought into the 
program by the COPY assembler 
instruction, and macro-definitions 
submitted with the main program 
for assembly. Listing control 
instructions are not printed, 
except for the following case: 
PRINT is listed when PRINT ON is 
in effect and a PRINT statement is 
encountered. 
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© 


EXAM 


SAMPLE PROGRAM 
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© 


© © 


© 




© 




© © 


LOC 


OBJECT CODE A0DR1 ADDR2 


STMT 


SOURCE 


STATEMENT 


DOS CL3-0 09/16/6 7 

sampTo99 






97 


. 










98 


• 


THIS 


IS THE TABLE 


SAMPLLOO 






99 


• 






SAMPL101 


000058 




100 




DS 


OD 


SAMPL102 


000058 


0000000000000000 


101 


TABLAREA 


DC 


XL8«0' 


SAMPL103 


000060 


CID3D7C8C1404040 


102 




DC 


CL8«ALPHA« 


SAMPL104 


000068 


0000000000000000 


103 




DC 


XLS'O 1 


SAMPL105 


000070 


C2C5E3C140404040 


104 




DC 


CLB'BETA' 


SAMPL106 


000078 


0000000000000000 


105 




DC 


XL8«0' 


SAMPL107 


000080 


C4C5D3E3C1404040 


106 




DC 


CL8«DELTA« 


SAMPL108 


000088 


0000000000000000 


107 




DC 


XLS'O' 


SAMPL 109 


000090 


C5D7E2C9D3D60540 


108 




DC 


CL8«EPSIL0N« 


SAMPL110 


000098 


0000000000000000 


109 




DC 


XL8'0« 


SAMPLlll 


O000AO 


C5E3C14040404040 


no 




DC 


CL8'ETA' 


SAMPL112 


0000A8 


0000000000000000 


111 




DC 


XLS'O* 


SAMPL113 


COOOBO 


C7C1D4D4C1404040 


112 




DC 


CL8'GAMMA' 


SAMPL114 


0000B8 


0000000000000000 


113 




DC 


XL8'0' 


SAMPLlli) 


OOOOCO 


C9D6E3C140404040 


114 




DC 


CL8M0TA' 


SAMPLU6 


0000C8 


0000000000000000 


115 




DC 


XL8'0' 


SAMPLIW 


OOOODO 


D2C1D7D7C1404040 


116 




DC 


CL8'KAPPA' 


SAMPL lib 


0OO0D8 


0000000000000000 


117 




DC 


XL8'0' 


SAMPL 1 19 


COOOEO 


D3C1D4C2C4C14040 


118 




DC 


CL8'LAMBDA« 


SAMPL120 


0000E8 


0000000000000000 


119 




DC 


XL8*0» 


SAMPL121 


OOOOFO 


D4E4404040404040 


120 




DC 


CL8«MU« 


SAMPL122 


0000F8 


0000000000000000 


121 




DC 


XL8'0' 


SAMPL12J 


000100 


D5h4404040404040 


122 




DC 


CL8'NU' 


SAKPL124 


000108 


0000000000000000 


123 




DC 


XL8"0« 


SAMPL125 


000110 


D6D4C9C3D9D6D540 


124 




DC 


CL8'0MICR0N' 


SAKPL126 


000118 


F040404040404040 


125 




DC 


CL8'0' 


SAHPL12 7 


000120 


D7C8C94040404040 


126 




DC 


CLS'PHI' 


SA^PL128 


C00128 


0000000000000000 


127 




OC 


XL8«0' 


SAMPL12i 


000130 


E2C9C7D4C1404040 


128 




DC 


CL8'SIGMA' 


SAMPL130 


C00138 


0000000000000000 


129 




DC 


XL8'0' 


SAMPL13J 


000140 


E9C5E3C140404040 


130 
131 


# 


DC 


CL8«ZETA« 


SAMPL132 
SAN'PL133 






132 


• 


THIS 


IS THE LIST 


SAMPL134 






133 


• 






SAMPL135 


000148 


D3C1D4C2C4C14040 


134 


LISTAREA 


DC 


CL8'LAMBDA« 


SAMPL136 


000150 


OA 


135 




DC 


X«OA' 


SAMPL1 37 


000151 


00001D 


136 




DC 


FL3«29« 


SAMPL130 


000154 


00000000 


137 




DC 


A(BEGIN) 


SAMPL139 


000158 


E9C5E3C140404040 


138 




DC 


CL8'ZETA' 


SAMPL140 


000160 


05 


139 




DC 


X'05« 


SAMPLI41 


000161 


000005 


140 




DC 


FL3'5» 


SAMPL 142 


000164 


00000032 


141 




DC 


A(LOUP) 


SAMPL143 


000168 


E3C8C5E3C1404040 


142 




DC 


CL8«THETA' 


SAMPL144 


000170 


02 


143 




DC 


X«02« 


SAf«PL145 


000171 


00002D 


144 




DC 


FL3'45« 


SAMPL146 


000174 


00000000 


145 




DC 


A(BEGIN) 


SAMPL 14 7 


000178 


E3C1E44040404040 


146 




DC 


CL8«TAU' 


SAMPL148 


000180 


00 


147 




DC 


X'OO' 


SAMPLL49 



b. Macro-definitions for system 
macro-instructions are not listed. 

c. The statements generated as the 
result of a macro-instruction fol- 
low the macro-instruction in the 
listing. 

d. Assembler or machine instructions 
in the source program that contain 
variable symbols are listed twice: 
as they appear in the source 
input, and with values substituted 
for the variable symbols. 

e. Diagnostic messages are not listed 
in-line in the source and object 
program section. An error indica- 
tor, ***ERROR*** f appears follow- 
ing the statement in error. The 
message appears in the diagnostic 
section of the listing. 

f. MNOTE messages are listed in-line 
in the source and object program 
section. An MNOTE indicator 
appears in the diagnostic section 
of the listing. The MNOTE message 



format is: severity code, message 
text. 

The MNOTE * form of the MNOTE 
statement results in an in-line 
message only. An MNOTE indicator 
does not appear in the diagnostic 
section of the listing. 

When an error is found in a pro- 
grammer macro-definition, it is 
treated like any other assembly 
error: the error indication 
appears after the statement in 
error, and a diagnostic is placed 
in the list of diagnostics. How- 
ever, when an error is encountered 
during the expansion of a macro- 
instruction (system or programmer 
defined) , the error indication 
appears in place of the erroneous 
statement, which is not listed. 
The error indication appears fol- 
lowing the last statement listed 
before the erroneous statement was 
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® 


© © 


© 




© 




© 


© 


LOC 


OBJECT CODE ADDR1 ADDR2 


STMT 


SOURCE 


STATEMENT 


UUS CL3- 


-0 09/16/67 

© 
SAMPL 130 


000181 


000000 


148 




DC 


FL3'0« 




000184 


00000001 


149 




DC 


A( 1) 




SAMPL151 


000188 


D3C9E2E340404040 


150 




OC 


CL8«LIST' 




SAMPL132 


000190 


••• ERROR »»« 


151 




DC 


X'lG' 




SAKPL 153 


000190 


0001C8 


152 




DC 


FL3'456' 




SAMPL 134 


000193 


00 














000194 


00000000 


153 




DC 


A(0) 




SAMPL155 


000198 


C1D3D7C8C1404040 


154 


LISTEND 


DC 


CL8'ALPHA« 




SAMPL136 


0001A0 


00 


155 




DC 


X'OO' 




SAMPL 15/ 


0001A1 


000001 


156 




DC 


FL3«1' 




SAMPL158 


0001A4 


0000007B 


157 
158 


• 


OC 


A( 123) 




SAMPL I 59 
SAMPL 160 






159 


• 


THESE 


ARE THE SYMBOLIC REGISTERS 




SAKPL 161 






160 


• 








SAMPL 162 


000001 




161 


Rl 


EOU 


1 




SAMPL 16 3 


000002 




162 


R2 


EQU 


2 




SAMPL164 


000003 




163 


R3 


EOU 


3 




SAKPL 163 


000005 




164 


R5 


EQU 


5 




SAMPL16r> 


000006 




165 


R6 


EQU 


6 




SAMPL 16/ 


000007 




166 


R7 


EQU 


7 




SAMPL160 


OOOOOC 




167 


R12 


EQU 


12 




SAMPL169 


OOOOOE 




168 
169 


R14 


EQU 


14 




SAMPL170 
SAMPLl/l 






170 


• 


THIS 


IS THE FORMAT DEFINITION OF LIST ENTRIES 




sampi.1 rz 






171 


• 








SAMPL1 /3 


COOOOO 




172 


LIST 


DSECT 






SAMPL 1/4 


000000 




173 


LNAME 


DS 


CL8 




SAMPL 175 


000008 




174 


LSWITCH 


DS 


C 




SAMPL 176 


000009 




175 


LNUMBER 


DS 


FL3 




SAMPL 177 


OOOOOC 




176 
177 


LADDRESS 

• 


DS 


F 




SAMPL178 
SAMPL179 






178 


• 


THIS 


IS FORMAT DEFINITION OF TABLE ENTRIES 




SAMPL180 






179 


• 








SAMPL 181 


000000 




180 


TABLE 


DSECT 






SAMPL 182 


COOOOO 




181 


TNUMBER 


DS 


EL3 




SAMPL 163 


000003 




182 


TSWITCH 


DS 


C 




SAMPL 184 


000004 




183 


TAODRESS 


DS 


F 




SAMPL 185 


C00008 




184 


TNAME 


DS 


CL8 




SAMPL 186 


ccoooo 




185 




END 


BEGIN 




SAMPL L67 


0001A8 


0000014800000010 


186 






=A (L I STARE A, 16, LISTEND) 






0001B4 


0000008000000004 


187 






=F'128,4,128' 







encountered, and the associated 
diagnostic message is placed in 
the list of diagnostics. 

Literals will appear in the listing 
following an LTORG or the END 
statement or both. Literals are 
identified by the equals (=) sign 
preceding them. 



j. If the END statement contains an 
operand, the transfer address 
appears in the location column 
(LOC). 

k. In the case of COM, CSECT, and 
DSECT statements, the location 
field contains the beginning 
address of these control sections 
i.e., the first occurrence. 

1. For a USING statement, the loca- 
tion field contains the value of 
the first operand. 



m. For LTORG and ORG statements, the 
location field contains the loca- 
tion assigned to the literal pool 
or the value of the ORG operand. 

n. For an EQU statement the location 
field contains the value assigned. 

o. Generated statements always print 
in normal statement format. Be- 
cause of this, it is possible for 
a generated statement to occupy 
two or more continuation lines on 
the listing. This is unlike 
source statements which are re- 
stricted to one continuation line. 

15J This field indicates the assembler level 
and version number, e.g., DOS CL2-1 
reads as DOS assembler level 2, version 
1. 



k 16 ) Current date obtained from SET card. 



^- 7 J Identification-sequence field 
source statement. 



from the 
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POS. ID REL.ID FLAGS ADDRESS 



PAGU 



01 


01 


oc 


000154 


01 


01 


oc 


000164 


01 


01 


oc 


000174 


01 


01 


oc 


0001A8 


01 


01 


oc 


0001B0 



RELOCATION DICTIONARY 



This section of the listing contains the 
relocation dictionary information passed to 
the linkage editor in the object module. 
The entries describe the address constants 
in the assembled program that are affected 
by relocation. 



First Digit — 



Second Digit — 



^y This column contains the external symbol 
dictionary ID number assigned to the ESD 
entry that describes the control section 
in which the address constant is used as 
an operand. 



a zero indicates that the 

entry describes an A-type, 

a Y-type, or a CCW address 

constant. 

a one indicates that the 

entry describes a V-type 

address constant. 

the first three bits of 
this digit indicate the 
length and sign of the 
address constant as fol- 
lows : 



^y This column contains the external symbol 
dictionary ID number assigned to the ESD 
entry that describes the control section 
in which the referenced symbol is 
defined. 



Bits 


and 1 


Bit 2 


00 = 


1 byte 


= + 


01 = 


2 bytes 


1 = - 


10 = 


3 bytes 




11 = 


4 bytes 





^j The two-digit hexadecimal number in this 
column is interpreted as follows: 



(2i) This column contains the assembled 
address of the field where the address 
constant is stored. 
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CROSS-REFERENCE 
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© 


(23) 


(24) 






<26; 






SYMBOL 


LEN 


VALUE 


OEFN 










BEGIN 


00002 


000000 


00057 


0137 


0145 


0185 




HIGHER 


00002 


00004C 


00092 


0087 








LADDRESS 


00004 


OOOOOC 


00176 


0070 








LIST 


00001 


000000 


00172 


006 








LISTAREA 


00008 


000148 


00134 


0059 


0186 






LISTENO 


00008 


000198 


00154 


0059 


0186 






LNAME 


00008 


000000 


00173 


0086 








LNUMBER 


00003 


000009 


00175 










LOOP 


00004 


000032 


00085 


0090 


0093 


0141 




LSWITCH 


00001 


000008 


00174 


0072 








MORE 


00004 


000006 


00061 


00 73 








MORE 


00004 


000006 


00090 


0062 








NONE 


00001 


000080 


00078 


0072 


0082 0094 




NOTFOUND 


00004 


000052 


00094 


0091 








NOTTHERE 


00004 


00001A 


00072 


0063 








Rl 


00001 


000001 


00161 


0064 


0083 


0084 0084 0089 0092 




R12 


00001 


OOOOOC 


00167 


0O57 


0058 






R14 


00001 


OOOOOE 


00168 


0061 


0088 


0095 




R2 


00001 


000002 


00162 


0090 


0093 






R3 


00001 


000003 


00163 


0083 


0085 


0089 0092 




R5 


00001 


000005 


00164 


0059 


0060 


0073 




R6 


00001 


000006 


00165 


0073 








R7 


00001 


000007 


00166 


0059 








SEARCH 


00004 


000026 


00082 


0056 


0061 






SWITCH 


00001 


000024 


00077 


0062 


0082 


0094 




TABLAREA 


00008 


000058 


00101 


0084 








TABLE 


00001 


000000 


00180 


0064 








TAODRESS 


00004 


000004 


00183 


0071 








TNAME 


00008 


000008 


00184 


0086 








TNUMBER 


00003 


000000 


00181 










TSWITCH 


00001 


000003 


00182 











Z' 



CROSS-REFERENCE 



This section of the listing information 
concerns symbols — where they are defined 
and used in the program. 



22) This column contains the symbols. 



*y This column states the length (decimal 
notation) , in bytes, of the field occu- 
pied by the symbol value. 



l^jThis column contains either the address 
the symbol represents, or a value to 
which the symbol is equated. 



2E y This column contains the statement num- 



ber of the statement in which the symbol 
was defined. 

(23/ This column contains the statement num- 
bers of statements in which the symbol 
appears as an operand. 

The following notes apply to the cross- 
referencing section: 

• Symbols appearing in V-type address 
constants do not appear in the cross- 
reference listing. 

• A PRINT OFF listing control instruction 
does not affect the production of the 
cross-reference section of the listing. 

• Undefined symbols appear in the cross- 
reference section. However, only the 
symbol column and the reference column 
have entries. 
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EXAM 






DIAGNOSTICS 


PAGE 


1 


© 


® 


® 








STMT 


ERROR CODE 


MESSAGE 








36 


IJ0073 


ILLEGAL NAME FIELD 








65 


IJQ059 


UNDEFINED SEOUENCE SYMBOL 








66 


IJG037 


MNOTE STATEMENT 








67 


IJQ088 


UNDEFINED OPERATION CODE 








90 


IJ0023 


PREVIOUSLY DEFINED NAME 


) 






151 


IJQ039 


INVALIC DELIMITER 








6 


STATEMENTS 


FLAGGED IN THIS ASSEMBLY 


1 


' 





DIAGNOSTICS 



This section containst-the diagnostic 
messages issued as a result of error 
conditions encountered in the program. 
Explanatory notes ^for each message are 
contained in Appendix N. 



27) This column contains the number of the 
statement in error. 



message iden- 



28) This column contains the 
tif ier. 



29) This column contains the message. 

The following notes apply to the diag- 
nostics section: 

• An MNOTE indicator of the form MNOTE 
STATEMENT appears in the diagnostic 
section, if an MNOTE -^statement is 
issued by a macro-instruction. The 
MNOTE statement itself is in-line in 
the source and object program section 
of the listing. 

• A message identifier consists of six 
characters and is of the form: 



IJQxxx 
IJYxxx 



IJQ 



IJY 



identifies the issuing agent as DOS/ 
TOS D assembler. 



identifies the issuing agent as DOS 
F assembler. 



xxx 



1. 



is a unique number assigned to the 
message. 

Two statistical messages may appear in 
the listing. They are: 

A message indicating the total number 
of statements in error. If no state- 
ments are in error, the message 



NO STATEMENTS FLAGGED IN THIS ASSEMBLY 

is printed following the Cross-Ref erence 
section and no diagnostic section is 
printed. 

I. A message if one or more Y-type address 
constants appear in the program. 

AT LEAST ONE RELOCATABLE Y-TYPE 
CONSTANT IN ASSEMBLY. 

This message if issued, appears before 
the diagnostic section. 
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APPENDIX J: ASSEMBLER LANGUAGES — FEATURES COMPARISON CHART 



Features not shown below are common to all assemblers. In the chart: 
Dash = Not allowed. 
X = As defined in Operating System/360 Assembler Language Manual. 



Feature 


Model 20 

Basic 

Assembler 


Basic 

Programming 

Support/360: 

Basic 

Assembler 


7090/7094 
Support 
Package 
Assembler 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS, TOS 
D Assemblers 


OS/360 
Assembler 
DOSF 
Assembler 


No. of Continuation Cards/Statement 
(exclusive of macro-instructions) 











1 


1 


2 


Input Character Code 


EBCDIC 


EBCDIC 


BCD & EBCDIC 


EBCDIC 


EBCDIC 


EBCDIC 


ELEMENTS: 














Maximum Characters per symbol 


4 


6 


6 


8 


8 


8 


Character self-defining terms 


1 Char, only 


1 Char, only 


X 


X 


X 


X 


Binary self-defining terms 








X 


X 


X 


Length attribute reference 








X 


X 


X 


Literals 








X 


X 


X 


Extended mnemonics 






X 


X 


X 


X 


Maximum Location Counter value 


2 ] 4-1 


2 ,6 -1 


2 24_i 


224-] 


2 24 -l 


2 24 -l 


Multiple Control Sections per assembly 








X 


X 


X 


EXPRESSIONS: 














Operators 


+ - 


+ -* 


+ -*/ 


+ -*/ 


+ -V 


+ -*/ 


Number of terms 


3 


3 


16 


3 


16 


16 


Levels of parentheses 








1 


5 


5 


Complex relocatability 








X 


X 


X 


ASSEMBLER INSTRUCTIONS: 














DC and DS 














Expressions allowed as modifiers 










X 


X 


Multiple operands 












Less than 33 


Multiple constants in an operand 


- - 


- - 


- - 


Except 
Address 
Consts. 


X 


X 


Bit length specifications 












X 


Scale modifier 








X 


X 


X 


Exponent Modifier 








X 


X 


X 


DC types 


Only 

c, X, 
H, Y,Q 


Except 
B, P, Z, 
V, Y, S, Q 


Except 
B, V, Q 


Except Q 


Except Q 


X* 


DC duplication factor 

— _. — __ 


Except Y 


Except A 


X 


Except S 


X 


X 



*The DOS F Assembler does not allow Q-type address constants. 



V 
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Page of GC24-3414-7 
Revised August 21 , 1970 
By TNL GN33-8087 



Feature 


Model 20 

Basic 

Assembler 


Basic 

Programming 

Support/360: 

Basic 

Assembler 


7090/7094 
Support 
Package 
Assembler 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS, TOS 
D Assemblers 


OS/360 
Assembler 
DOSF 
Assembler 


DC duplication factor of zero 


Except Y 






Except S 


X 


X 


DC length modifier 


Except 
H, Y 


Except 
H, E, D 


X 


X 


X 


X 


DS types 


Only 
H, C 


Only C, 
H, F, D 


OnlyC, 
H, F. D 


X 


X 


X 


DS length modifer 


Only C 


Only C 


OnlyC 


X 


X 


X 


DS maximum length modifier 


256 


256 


256 


256 


65,535 


65,535 


DS constant subfield permitted 








X 


X 


X 


COPY 










X 


X 


CSECT 








X 


X 


X 


DSECT 


~ 


— 


-- 


X 


X 


X 


ISEQ 








X 


X 


X 


LTORG 








X 


X 


X 


PRINT 








X 


X 


X 


TITLE 






X 


X 


X 


X 


COM 










X 


X 


ICTL 


- - 


1 operand 
(1 or 25 
only) 


1 operand 


X 


X 


X 


USING 


2 operands 
(operand 1 
relocatable 
only) 


2 operands 
(operand 1 
relocatable 
only) 


2-17 operands 
(operand 1 
relocatable 
only) 


6 operands 


X 


X 


DROP 


1 operand 
only 


1 operand 
only 


X 


5 operands 


X 


X 


CCW 


— 


operand 2 

(relocatable 

only) 


X 


X 


X 


X 


ORG 


no blank 
operand 


no blank 
operand 


no blank 
operand 


X 


X 


X 


ENTRY 


1 operand 
only 


1 operand 
only 


1 operand 
only 


1 operand 
only 


X 


X 


EXTRN 


1 operand 
only 


1 operand 
only (max 14) 


1 operand 
only 


1 operand 
only 


X 


X 


WXTRN 




-- 




-- 


DOS 14K 
D only 




CNOP 


-- 


2 decimal 
digits 


2 decimal 
digits 


2 decimal 
digits 


X 


X 


PUNCH 


-- 


-- 


-- 


X 


X 


X 


REPRO 


-- 


-- 


-- 


X 


X 


X 


Macro Instructions 


S/360 
Model 20 
IOCS only 


— 


~ — 


X 


X 


X 
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Macro Facility Features 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS, TOS 
Assemblers 


OS/360 
Assembler 


Operand Sublists 




X 


X 


Attributes of macro-instruction operands inside macro definitions and symbols used in 
conditional assembly instructions outside macro definitions. 


- - 


X 


X 


Subscripted SET symbols 




X 


X 


Maximum number of operands 


49 


100** 


200 


Conditional assembly instructions outside macro definitions 




X 


X 


Maximum number of SET symbols 








global SETA 


16 


* 


* 


global SETB 


128 


* 


* 


global SETC 


16 


* 


* 


local SETA 


16 


* 


* 


local SETB 


128 


* 


* 


local SETC 





* 


* 


*The number of SET symbols permitted by the Disk and Tape Operating Systems Assemblers and the Operating 
System Assembler is variable, dependent upon the available main storage. 




**Maximum number of operands in DOS assembler F is 200. 

Note: The maximum size of a character expression is 127 in DOS (assembler D) and TOS and 255 
in OS and DOS (assembler F). 


characters 
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APPENDIX 



CARD INPUT FOR ASSEMBLY RUNS 



Figure K-l lists the control cards necessary to assemble a program. The card groups are 
listed in the order in which they must appear. All job control cards enter the system 
via SYSRDR, all others via SYSIPT. The same device may be assigned for both SYSRDR ana 
SYSIPT. If this device is a disk file, the combined file must be designated as SYSIN. 
Job Control s tenements are described in the publications: IBM System/360 Disk Operating 
System, System Control and System Service Programs -or IBM System/360 Tape Operating System, 
System Control and System Service Programs. The form numbers are listed in the preface. 



j Card Group 



"T t 

| Card Arrangement | Comments 



j. + + 1 



Job Control 


|// 


JOB 


First card in group, always 
required. 




|// 


ASSGN SYSSLB,.. 


Used when the source statement 
library is on a separate 
(private) file. 1 




|// 


ASSGN SYSIPT, .. 


Source program input 




1 /7 


ASSGN SYSLST,.. 


Program listing 




\// 


ASSGN SYS001,... 

ASSGN SYS002, 

ASSGN SYS003,... 


> Work files 




|// 


ASSGN S¥SPCH, .. 


Required when DECK 
option is specified. 




|// 


ASSGN -r.Yr.LNK,.. 


Re qu i re d wh en ass embl e- an d- 
execute is specified. 




|// 


OPTION DECK, ... 


Optional. Used to indicate 
desired assembler functions. 




4. 


EXEC ASSEMBLY 

j 


Required. 

1 ____ _ _ _ _ _ _ 


Assembler 
Input 


— r i 
j Source Deck 


1 ____ _ _ _ _ _ _ 

Source statements (machine , 
assembler , and macro instruc- 
tions) . 




|/* 




Indicates end-of-data set 



h 1 X 



I Job Control 

L. 



■+ 
1/6 



End of job statement 



x x . . j 

1 SYSSLB is assigned as follows: 

For DOS — SYSSLB cannot be assigned for the 10K assembler. If SYSSLB is 
assigned for the 14K D assembler or the F assembler, it is concatenated with the 
source statement library on SYSRES. (The assembler searches first SYSSLB and 
then the SYSRES library.) The 10K D assembler and — if SYSSLB is not assigned 
— the 14K D and F assemblers use only the source statement library of SYSRES. 

For TOS — Both TOS assembler variants use either SYSSLB or the source state- 
ment library on SYSRES. They use SYSSLB if it is assigned. If it is not 
assigned, they use the SYSRES library. 

Note 1 : Only those assignments and options not already in effect are required. 

Note 2 : Assignments for SYSIN and/or SYSOUT must be accomplished by permanent assign- 
ments. For details see the publications for DOS and TOS system control and system ser- 
vice programs (see preface) . 

Figure K-l. Card Input for an Assembly •> 
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I Symbolic Unit I 

SYSRDR ■ 

(Required "if "theSYSIN op- ' 

tion is not used) I 

I SYSIPT I 

(Required if the SYSIN op 
tion is not used) 



Function and Device 



Job control statement input device. /Viay be the same device as SYSiFT except for combined input from IBM 231 1 or 2314 Disk 

Extent (see SYSIN). 
IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 Card Reader, IBM 2400-series Magnetic Tape Unit, or IBM 231 1 or 2314 

Disk Extent for the disk system. 



H 



Source program input device. May be the same device as SYSRDR except for combined input from IBM 231 1 or 2314 Disk Extent 
(see SYSIN). 

IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 Card Reader, IBM 2400-series Magnetic Tape Unit (7- or 9-track), or 
IBM 231 1 or 2314 Disk Extent for the disk system. If the Data Conversion feature was used to prepare the 7-track tape, it 
must also be used to read the tape. The tape or disk records must be 80-byte unblocked records. 



SYSIN 
(Required for combined 
disk input. Optional for 
combined card or tape 
nput) 



I mp 



Used for a combined input file for SYSRDR and SYSIPT. I 

IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 Card Reader, IBM 2400-series Magnetic Tape Unit, or IBM 231 1 or 2314 ' 

Disk Extent for the disk system. 
SYSIN can be used in lieu of the SYSRDR and SYSIPT designation when the file is card or tape input. It must be used when the 

file is disk input (disk system only). 



SYSLST 
(Required if the SYSOUT 
option is not used) 



Program listing device. 

IBM 1403, 1404 (continuous forms only), or 1443 Printer. IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with or with- 
out the Data Conversion feature) or IBM 231 1 or 2314 Disk Extent for the disk system. 
Listing on tape or disk appears as 121 -character print images (a single forms-control byte followed by a 120-character line image) 



I SYSPCH 

I (Optional) 



,71 



r- 



Object program output device. 

IBM 1442, 2520, or 2540 Card Read Punch. IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion 

feature), or IBM 231 1 or 2314 Disk Extent for the disk system. 
Output on tape or disk is in 81 -byte unblocked records. 
Not used when the Assemble-and-Execute or the NODECK option is specified. 



SYSOUT 
(Optional) 



Used for a combined output file for SYSLST and SYSPCH to a single tape unit. 

IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion feature). 



SYSLNK 
(Optional) 



u 



Used for temporary storage of assembler output. Required only when the Assemble-and-Execute option is specified. 
IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion feature) for the tape system or IBM 231 1 or 
2314 Disk Extent for the disk system. This extent may be on the same device that contains the DOS resident system. 



SYS001 
SYS002 
SYS003 



(Required) 



h- 



-t-- 



Used for temporary work area during assembly. 

IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion feature) for either the tape or disk systems or 

three IBM 231 1 or 2314 Disk Extents for the disk system. These extents may be on the same device that contains the DOS resi' 

dent system. 
For details of work file assignment see the publication for DOS system generation (see preface). 



H 



SYSSLB 
(Optional or 2314) 



Must be same device type as SYSRES. See Appendix K, Figure K-l. 



|<o 

NOTE: The 231 1 or 2314 can be used for one or more of the symbolic units SYSRDR, SYSIPT, SYSIN, SYSPCH, or SYSLST only if a supervisor has been SYSGEN'd V. 
that can accomodate input from disk storage or output to disk storage for these units. For details see the DOS system generation manual (see preface) 

Figure K-2. Device Assignments 



I Input and Output Using an IBM 1442 or 2520 Card Read Punch; Whenever an IBM 1442 or 2520 Card Read Punch is assigned to SYSRDR, SYSIPT, or SYSIN and also i 

■ to SYSPCH, a number of blank cards sufficient for punching the output deck must follow the/* card which follows the assembler END statement in the source i 

deck. This is to prevent erroneously punching the cards of a following job step. Any extra cards that are not needed are automatically bypassed. i 

Figure K-3. Operating Considerations 



v_„ 
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Card Group 



Card Arrangement 



Comments 



Job Control 



n 



// JOB . . . 

// ASSGN SYSRLB. 

// ASSGN SYSSLB. 

// ASSGN SYSIPT. 

// ASSGN SYSLST. 

// ASSGN SYSLNK. 

// ASSGN SYS001. 
// ASSGN SYS002. 
// ASSGN SYS 003. 

// OPTION LINK. . 
// EXEC ASSEMBLY 



First card in group, always required. 

Used by the Linkage editor when the 
relocatable library is on a separate 
(private) file and previously assembled 
modules are to be included. 

Used when the source statement library 
is on a separate (private) file. 1 

Source program input 

Program listing 

Required for assemble-and-execute. 

> Work files 



Required. Used to indicate LINK option 
and any additional assembler functions 
desired. 

Required 



Assembler Input Source Deck 



/' 



Source statements (machine-, assembler- 
and macro-instructions) . NOTE: If the 
operand of the END statement is omit- 
ted, a PHASE card must precede the // 
EXEC ASSEMBLY card or an ENTRY card 
must follow the END statement (tape 
system only) . 

Indicates end-of-data set 



Job Control 



ENTRY . . . 
// EXEC LNKEDT 
// EXEC 



Calls the Linkage Editor 



Data 



Data, if any 
/* 



End-of-data set indicator 



Job Control 



/& 



End of job statement 



1 See Figure K-l 

Note 1 : Only those assignments and options not already in effect are 
required. 

Note 2 ; Assignments for SYSIN and/or SYSOUT must be accomplished by 
permanent assignments. For details see the publications for DOS and 
TOS system control and system service programs (see preface) . 

| Figure K-4. Card Input for Assembly, Linkage Editing, and Execution 
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Note: 
Broken lines Indicate 
where the Assembler 
input would be placed 
if SYSIPTwere the 
same unit as SYSRDR. 



{// EXEC ASSEMBLY 
Optional — -/ ""jy/ASSGN SYSSLB,. ~ 
j^/ASSGNSYSPCH,.. 
f//ASSGN SYS003,.. .| -J 



f//ASSGN SYS002, 
f//ASSGNSYS001,.. 



Optional — »f//ASSGNSYSLNK,.. T 
f//ASSGNSYSLST, .. . 



f//ASSGN SYSIPT,. 



Optional —*■(// OPTION .. 



7/ JOB... 





SYSSLB 
(Optional) 



SYSRDR 



System /360 



SYSLOG 



See Figure K- 1 . 




V. 



\ 

I 

\ / 

y— 

I SYSIN 
-I (Optional) 



SYSOUT 
(Optional) 



-J 
SYSPCH 
(Optional) 



:_SYSLNK 
(Optional) 



I Figure K-5. I/O Units Used by the Tape Assembler 
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Note: 
Broken lines indicate 
where the Assembler 
input would be placed 
if SYSIPT were the 
same unit as SYSRDR. 

If SYSIPT and 
SYSRDR are the same 
disk unit, they must be a 
combined file assigned 
as SYSIN. 

Optional . 



Optional 




/ 



'I 






I 



J SYSIN 

— . ** 

(Required if SYSRDR 
and SYSIPT are a 
combined disk file. 
Optional if SYSRDR 
and SYSIPT are a 
combined card or 
tape file.) 



^V 



SYS LOG 



—I ' . ■ 

SYSPCH 
—^ (Optional) . 



SYSOUT 
(Optional) 



See Figure K-l 



I Figure K-6. I/O Units Used by the Disk Assembler 
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// JOB . 



// ASSGN SYSIPT,.. 

// ASSGN SYSLST,... 

// ASSGN SYS001,.. 
// ASSGN SYS002,.. 
// ASSGN SYS003,.. 

// ASSGN SYSLNK # ... 

// OPTION LINK,... 

// EXEC ASSEMBLY 

Source Deck 
/* 



Assemble- and- execute 






+ 



ENTRY .... 
// EXEC LNKEDT 



Assemble-and-execute 
(Include object 
routines from the 
relocatable library) 






// JOB ... 

// ASSGN SYSIPT,.. 

// ASSGN SYSLST,.. 

// ASSGN SYS001,.. 
// ASSGN SYS002,.. 
// ASSGN SYS003,.. 

// ASSGN SYSLNK,.. 

// OPTION LINK,.. 

// EXEC ASSEMBLY 

Source deck 
/* 



INCLUDE SUBR1 
INCLUDE SUBR2 



ENTRY .... 
// EXEC LNKEDT 



ite |Assemble-and-execute 
| (Include object 
| routines from cards) 

y)| 


Assemble-and-execute 
(Include object 
routines from the 
relocatable library 
and from cards) 

1 


|// 


JOB ... 


r — 
// 


JOB ... 


w 


ASSGN SYSIPT,.. 


// 


ASSGN SYSIPT, 


. ]// 


ASSGN SYSLST,.. 


// 


ASSGN SYSLST,... 




ASSGN SYS001,.. 
ASSGN SYS002,.. 
ASSGN SYS003,.. 


// 
// 
// 


ASSGN SYS 001,.. 
ASSGN SYS 002,.. 
ASSGN SYS 00 3,.. 


. |// 


ASSGN SYSLNK,.. 


// 


ASSGN SYSLNK,.. 


|// 


OPTION LINK,.. 


// 


OPTION LINK,... 


— + — 

|SOl 
|/* 

— 1 


EXEC ASSEMBLY 


// 



SOX 

/* 

— 


EXEC ASSEMBLY 


iree deck 
INCLUDE 


iree deck 
INCLUDE SUBR1 


| Object deck(s) 




INCLUDE 


|/* 




Object deck(s) 






/* 


INCLUDE SUBR2 
INCLUDE SUBRT 










|// 


EXEC LNKEDT 


// 


EXEC LNKEDT 






Any Job Control cards needed for the programs to be executed. 

// EXEC | // EXEC | // EXEC | // EXEC 

Data, if any joata, if any |Data, if any |Data, if any 
/* |/* |/* |/* 

/S |/6 \/& |/6 

If SYSRDR and SYSIPT are different units, a /& card must be placed after the last 

EXEC card in SYSRDR, and should be placed after the last /* in SYSIPT. 



I Figure K-7. Card Input for Different Variations of Assembly, Linkage Editing and Execution, 
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APPENDIX L: REPLACING THE CURRENT ASSEMBLER 



The EXEC ASSEMBLY statement causes the job 
control program to look for a phase with 
the name ASSEMBLY in the Core Image 
Library and load it into main storage. 
Since duplicate names cannot appear in a 
library, and every version of the assembler 
processor has the same phase name, only one 
of them can be in the Core Image Library at 
a time. Therefore the variant best suited 
for the particular installation is normally 
included in the Core Image Library. The 
programmer can, however, select another 
variant from the Relocatable Library and 
include it in the Core Image Library 
instead of the variant that is already 
there. 

Figure L-l shows the Job Control cards 
required to bring a particular assembler 
variant from the Relocatable Library into 
the Core Image Library, and Figure L-2 
shows the valid assembler names (the names 
under which the variants would be cataloged 
in the Relocatable Library) . After the 
variant has been included in the Core Image 
Library, it can be loaded and executed 
through the EXEC ASSEMBLY statement. 



//JOB CONDENSE 




//EXEC MAI NT 




DELETCASSE.ALL 


» This job not needed in TOS 


CONDS CL 




/ & 




// JOB LINKASM 




//OPTION CATAL 




INCLUDE name* 




// EXEC LNKEDT 




/& 





* 'name' selected from those listed in Figure K-5 

I Figure L-l. Card Input for Selecting 

I Different Assembler Variants 

Variants IJQT16, IJQD16TW, and IJQD16DW 
must be used if the assembler is to be run 
in less than 14K of available core. Vari- 
ants IJQT32 and IJQD32 may be used if avail- 
able core is never less than 14K. The IJQ 
- N variants are D assemblers. Variant IJYASM 

) (the DOS F assembler) may be used if avail- 
V able core is never less than 45,056 bytes. 



IJQT32 and IJQD32 are generally faster than 
LJQT16 and IJQD16DW or IJQD16TW, respectively, 
because they have test I/O buffering and can 
use the additional core to build larger 
symbol tables. The difference in speed varies 
with the amount of additional core and the 
number of symbols in the assembly. 



Thus, if the assembly has few symbols or 
if only a small amount of additional core 
is available to a larger variant, the larger 
and smaller variants will be nearly equal in 
speed. 

For comparable assemblies, DOS assembler 
F (IJYASM) is up to 45% faster than DOS 
assembler D. 

Note 1 : The descriptions 16K and 32K refer 
to the machine size required to run the 10K 
and 14K variants respectively (except that 
the 14K variant can run on a System/360 
Model 30 with 24K of core) . 

Note 2 ; Some installations have two or more 
assemblers in the Core Image Library. In 
such instances, the phase names have been 
changed to avoid duplicate names in the 
library. (Refer' to IBM System/36 Disk Oper- 
ating System, System Generation and Maintenance , 
Form C24-5033 and IBM System/360 Tape Operating 
System, System Generation and Maintenance , 
Form C24-5015) . 



Name 


System 


Work Files 1 


Minimum Core 


IJQD16DW 


DOS 


Disk 


10,240 


IJQD16TW 


DOS 


Tape 


10,240 


IJQD32 


DOS 


Mixed 


14,336 


IJYASM 


DOS 


Mixed 


45,056 


IJQT16 


TOS 


Tape 


10,240 


IJQT32 


TOS 


Tape 


14,336 


1 . Mixed work files mean any combination of 2400-series 
tapes and/or 231 1 and/or 2314 disk extents for SYS001, 
SYS002, and SYS003. In general, the assembler uses 
SYS001 and SYS002 as serial files and SYS003 as a 
random access file. 


2. Minimum core refers to the minimum number of contigu- 
ous bytes necessary for the particular assembler variant 
to function correctly. 



Figure L-2. Assembler Variants 
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APPENDIX M: OBJECT DECK OUTPUT 



Figure M-l lists the card groups that make up the output deck produced by the assembler, 
The groups are listed in the order in which they appear in the output deck. 

Note : No output deck will be produced when NODECK appears in the OPTION card. 

The formats of the ESD, TXT, RLD, END, and SYM cards are shown in Figures M-2 
and M-3. 



Card Group 
Reproduced Cards 

Symbol Table (SYM) 



External Symbol Dictionary 
(ESD) 



Remarks 



Problem Program 



Relocation Dictionary (RLD) 



END Card 



These reproduced cards result 

from REPRO or PUNCH instructions 
located before STARr. 

Produced when SYM appears in the 
OPTION card. 



Consists of text (TXT) and 
reproduced cards. The repro- 
duced cards result from REPRO 
or PUNCH instructions located 
after START. 

Produced if relocatable constants 
are present. 

Produced as the last card of the 
output deck. 



Obj ect Deck Identification 

The 4-character assembly identification label punched into 
the name entry of the first TITLE card in the source program 
is punched into columns 73-76 of each record in the object 
deck. If there is no label, these columns are left blank. 



Object De ck S equencing Numbering 



An assembler-generated sequence number is punched into 
columns 77-80 of each card in the object deck. 



J Figure M-l. Assembler Output Deck 
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The information in each card is in Extended Binary Coded Decimal Interchange Code. 



r t 

Columns | Punched 
j. x 

ESD Card 
h 



1 I— 



H 



2-4 



11-12 



15-16 



17-72 



73-76 



Multiple punch (12-2-9). Iden- 
tifies this as a loader card. 

ESD — External Symbol Dictionary 
card. 

Number of bytes of information 
contained in this card. 

External symbol identification 
number (ESID) of the first SD, 
PC, WX, or ER on this card. 
Relates the SD, PC, WX, or ER 
to a particular control section. 

Variable information. 

8 positions. Name. 

1 position. Type code to 
indicate SD, PC, LD, WX, or ER. 

3 positions. Assembled 
origin. 

1 position. Blank. 

3 positions. Control section 
length, if an 3D- type or a PC- 
type. If an LD-type, this field 
contains the external symbol 
identification number (ESID) of 
the SD or PC containing the 
label. 

Program identification taken 
from the name field of the first 
TITLE statement. 



77-80 | Sequence number. 

x 



TXT Card 



2-4 
6-8 

11-12 
15-16 

17-72 



Multiple punch (12-2-9). 
Identifies this as a loader 
card. 

TXT — Text card. 

Assembled origin (address of 
first byte to be loaded from 
this card). 

Number of bytes of text to be 
loaded. 

External symbol identification 
number (ESID) of the control 
section (SD) containing the 
text. 



| Columns | Punched 



-H 



73-76 | Program identification taken 

j from the name field of the first 
| TITLE statement. 

I 
77-80 | Sequence number. 

x 



RLD Card 



1 

2-4 

11-12 

17-72 



73-76 



77-80 



Multiple punch (12-2-9). 

RLD — Relocation Dictionary card. 

Number of bytes of information 
contained in the card. 

Variable information (multiple 
items) . 

2 positions. Pointer to the 
relocation factor of the con- 
tents of the load constant. 

2 positions. Pointer to the 
relocation factor of the control 
sections in which the load con- 
stant occurs. 

1 position. Flag indicating 
type of constant. 

3 positions. Assembled 
address of load constant. 

Program identification taken 
from the name field of the first 
TITLE statement. 

Sequence number. 



END Card 



1 | Multiple punch (12-2-9). 

2-4 | END 

6-8 | Assembled origin of the label 

supplied to the Assembler in the 
END card (optional) . 

15-16 1ESID number of the control sec- 
tion to which this END card 
refers. 

17-22 | Symbolic label supplied to the 
Assembler if this label was not 
defined within the assembly. 

73-76 I Program identification taken 

from the name field of the first 
TITLE statement. 

77-8 j Sequence number. 



Up to 56 bytes of text — data or 
| instructions to be loaded. j 
l x j 

Figure M-2. Format of ESD, TXT, RLD, and END Cards 
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Columns 


Contents 


1 


12-2-9 punch 


2-4 


SYM 


5-10 


Blank 


11-12 


Number of bytes in the Variable Field 


13-14 


Blank 


15-16 


ESID 


17-72 


The Variable Field (see below) 


73-76 


Deck ID (from the first TITLE card) or blank 


77-80 


Card sequence number 



The variable field (columns 17-72) contains up to 56 bytes of 
AUTOTEST text. The items making up the text are packed together; 
consequently the last card may contain less than 56 bytes of text 
in the variable field. The contents of the fields within an 
individual text item are, as follows: 

1. Organization (1 byte) : 



Bit 
Bit 
Bit 
Bit 



Bit 4 



ft: 



DC or DS 
not DC or DS 
Bits 5-7: Length of name minus one, 



2. Address (3 bytes): displacement from base of control section. 

3. Symbol Name (1-8 bytes): symbolic name of the particular item. 
The following fields are present only for data-type items : 

4. Data Type (1 byte) : 

X'00* character 

X ' 4 ' hexadecimal 

X'08 1 binary 

X'10 1 full word, fixed point 

X'14 1 half word, fixed point 

X*18' single precision floating point 

X'lC double precision floating point 

X'20' A-type or Q-type address constant 

X'24' Y-type address constant 

X'28 1 S-type address constant 

X'2C V-type address constant 

X'30 1 packed decimal 

X'34 1 zoned decimal 

5. Length (1-2 bytes): length of data item minus one. Occupies 
two bytes for character, hexadecimal and binary items; 
otherwise one. 



6. Multiplicity (1 byte): always X'01 1 . 



Figure M-3. Format of the SYM card. 
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V. 



New text can be substituted for assembled 
text using the REP card. Each REP card 
must contain the assembled address of the 
first byte to be replaced and the identifi- 
cation of the control section to which it 
refers, and may contain from two to 22 
bytes of text. The text is substituted, byte 
for byte, for the original text, beginning 
at the address specified. The address, the 
control section reference, and the new text 
must be stated in hexadecimal. The REP card 
must be placed after the TXT cards in the 
object module that it modifies. Its format 
is shown in Figure M-4. 



Columns 


Contents 


1 

2-4 
5-6 
7-12 

13 
14-16 

17-70 

71-72 
73-80 


Multiple punch (12-2-9) . 
Identifies this as a loader 
card. 

REP — Replace text card. 
Blank. 

Assembled address of the 
first byte to be replaced 
(hexadecimal) . Must be right 
justified with leading zeros 
if needed to fill the field. 
Blank. 

External symbol identifica- 
tion number (ESID) of the 
control section (SD) contain- 
ing the text (hexadecimal) . 
Must be right justified with 
leading zeros if needed to 
fill the field. 
From one to eleven 4-digit 
hexadecimal fields separated 
by commas , each replacing two 
bytes. A blank indicates the 
end of information in this 
card. 
Blank. 

May be used for program iden- 
tification. 



Figure M-4. Format of the REP card. 
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APPENDIX N: DIAGNOSTIC ERROR MESSAGES 



Diagnostic error messages are printed fol- 
lowing the cross reference listing, in 
statement number order. The message code 
has the form IJQnnn for the D assembler and 
IJYnnn for the F assembler. Figure N-l 



lists the diagnostic messages and their 
message codes. If errors are encountered 
while editing library macros, the state- 
ment number referenced will be that of the 
"END" statement. 



Message 



Message 

Code 
H + 

IJQlOOl 

ijy; 



U0I002 

IJYJ 



IJQl 

IJYl 



>po: 



IJOpOa 

IJY/ 

IJQ] 
IJYJ 

IJQ\006 
IJYJ 



>lpO! 
•J 



IJQI007 

IJYJ 

IJQ]p08 
IJYJ 



IJQ|p09 

IJYJ 

IJQ1010 
IJYJ 



IJOjOll 

IJYJ 



IJQJ012 

IJYJ 

IJQ|013 

IJYJ 



-+ 



DUPLICATION FACTOR ERROR 



RELOCATABLE DUPLICATION FACTOR 
LENGTH ERROR 

RELOCATABLE LENGTH 

S-TYPE CONSTANT IN LITERAL 

INVALID ORIGIN 

LOCATION COUNTER ERROR 
INVALID DISPLACEMENT 

MISSING OPERAND 

INCORRECT REGISTER SPECIFICATION 



SCALE MODIFIER ERROR 



RELOCATABLE SCALE MODIFIER 



EXPONENT MODIFIER ERROR 



Meaning 



Duplication factor: 

a. is zero in a literal. 

b. is not a positive abso- 
lute expression. 

Duplication factor is relo- 
catable. 

1. Out of permissible 
range- 

2. Invalid specification. 

Length is relocatable. 

S-type constant in literal. 

Location counter has been 
reset to a value less than 
the starting address of the 
control section. 

Location Counter has 
exceeded 2 24 -1. 

Displacement in an explicit 
address is not within 
0-4095. 

Operand is missing- 

1. Specification of 
register is greater 
than 15. 

2. Odd register is speci- 
fied where an even 
register is required. 

Scale modifier is: 

a. too large. 

b. not an absolute expres- 
sion. 

Scale modifier is not al- 
lowed to be relocatable. 

Exponent is: 

a. out of range. 

b. not specified as an 
absolute expression. 



w 



Figure N-l. Assembler Diagnostic Error Messages (Part 1 of 14) 
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r r 

Message 
Code 



Message 



IJQplU 
IJYJ 

IJQpl5 
IJYf 



IJQI016 
UYf 






| Meaning 






$3 



IJQpl7 

ijyf 



JOtoll 



IJQK)18 

iUY 



IJQ]pl9 

ijy; 



Udp20 

IJYf 



IJQl021 
(IJYf 



Ijd022 
IJY/ 



IJQk)23 
IJYJ 



RELOCATABLE EXPONENT MODIFIER 



INVALID LITERAL USAGE 



INVALID NAME 



l DATA ITEM TOO LARGE 



INVALID SYMBOL 



.EXTERNAL NAME ERROR 



INVALID IMMEDIATE FIELD 



SYMBOL NOT PREVIOUSLY DEFINED 



|ESD TABLE OVERFLOW 



PREVIOUSLY DEFINED NAME 






Exponent modifier is not 
allowed to be relocatable. 

A valid literal is used ille- 
gally, e.g., specifies a 
receiving field or a reg- 
ister. 

Name entry incorrectly speci- 
fied — 

a. contains more than 8 
characters. 

b. does not begin with a 
letter. 

c. has a special character 
embedded . 

The constant is too large 
for: 

a. the data type. 

b. the explicit length. 

The symbol specification is 
invalid, e.g., longer than 8 

characters, embedded special 
character. 

1. Identical name entry 
in a CSECT and a DSECT 
statement. 

2. Identical operands in one 
or more EXTRN/WXTRN state- 
ments. 

1. The immediate field is 
not an absolute expres- 
sion. 

2 * The value of the immedi- 
ate field is not in the 
range 0-255. 

A statement requiring pre- 
defined symbols contains a 
symbol not predefined. 

The total number of control 
sections, dummy sections, and 
unique symbols in EXTRN 
statements and V-type con- 
stants exceeds 255. 

The symbol in the name entry 
has appeared in the name 
entry of a previous state- 
jment. 



I Figure N-l. Assembler Diagnostic Error Messages (Part 2 of 14) 
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r t 

Message 
Code 

H 

IJQT024 
IJYf 



Message 
UNDEFINED SYMBOL 






IJQI025 

IJYf 



IJd026 
| IJYf 

IJOJ027 

IJYf 

IJQ1028 
IJYf 



reap: 

rf 



Ud029 
IJYf 



IJQJ030 
IJYJ 

ndp3i 

IJYJ 

IJd032 
IJYJ 



Udlp33 

IJYf 



IJQ103U 

IJYJ 



IJQp35 
IJYJ 



reap: 

rYf 



IJ0p36 
IJYJ 



IJQI037 
IJYJ 



RELOCATABILITY ERROR 



TOO MANY LEVELS OF 
PARENTHESES 

TOO MANY TERMS 



REGISTER NOT USED 

CCW ERROR 

INVALID CNOP 
UNKNOWN TYPE 



| OP-CODE NOT ALLOWED TO 
BE GENERATED 



ALIGNMENT ERROR 



INVALID OP-CODE 



I ADDRESSABILITY ERROR 



OPERAND FIELD 
MUST BE BLANK 



MNOTE STATEMENT 



Meaning Jj 

A symbol being referenced has not { 
been defined in the program. f 

I 
|1. A relocatable or complex | 
relocatable expression is speci-| 
fied where an absolute expres- | 
sion is required. J 

I 

Expression specifies more than | 
5 levels of parentheses. | 

I 
More than 16 terms specified in an | 
expression. | 

I 
| A register specified in a DROP j 

statement is not currently in use. | 

I 
Bits 37-39 of the Channel Command | 
Word are set to nonzero. j 

I I 

Invalid range j 

I I 

Incorrect type designation in a DC, | 
|DS, or literal. j 

I 
Operation code allowed only in j 
source statement has been obtained j 
through substitution of a value I 
for a variable symbol. I 

I 

(Referenced address is not aligned to[ 

the proper boundary for this ( 

I instruction. | 

I 
Invalid operation code: | 

a. More than eight characters. j 

b. Operation entry not followed by | 
a blank on same card. | 

i I 
j The referenced address is not within| 

'the range of a USING instruction. | 

I I 

Operand found for an operation I 

code which does not allow operands. I 
(This message may be produced by the| 

assembler if an operand is present | 

in a COM, EJECT, or LTORG statement j 

when the operation field has been j 

created by variable symbol substi- j 

tution. Operands in these state- | 

ments are not used but are not in j 

error.) | 

I I 

| An MNOTE statement has been generat- | 

|ed from a macro definition. The j 
| text and severity code of the MNOTE | 
J statement is in-line in the listing. j 



I Figure N-l . Assembler Diagnostic Error Messages (Part 3 of 14) 
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Message 
Code I Message 



Meaning 



IJQ) 038| 
IJYJ 



ENTRY ERROR 



IJQ) 039 
IJYJ 



IJQ) 040; 
IJYJ 

IJQ) 041 
IJYJ 



IJQ) 042 
IJYJ 



IJQ) 043 
IJYJ 

IJQ) 044 | 
IJYJ 



IJQX)U5 
IJYJ 



IJQK)46 
IJYJ 



LI' 



ij 

IJYI 



f 47 



INVALID DELIMITER 



GENERATED RECORD 
TOO LONG 

UNDECLARED VARIABLE 
SYMBOL 



SINGLE TERM LOGICAL 
EXPRESSION IS NOT A 
SETB SYMBOL 

SET SYMBOL PREVIOUSLY 
DEFINED 

SET SYMBOL USAGE 
INCONSISTENT WITH 
DECLARATION 

ILLEGAL SYMBOLIC 
PARAMETER 



AT LEAST 1 RELOCATABLE 
Y-TYPE CONSTANT IN 
ASSEMBLY 



SEQUENCE SYMBOL 
I PREVIOUSLY DEFINED 



1. More than 100 ENTRY operands in 
this program. 

2. A symbol in the ENTRY operand: 

a. appears in more than one 
ENTRY statement. 

b. is undefined. 

c. is defined in a dummy sec- 
tion. 

d. is defined in blank common. 

e. is equated to a symbol defined 
by an EXTRN or WXTRN statement. 

Any syntax error : 

1. A symbol has other than alpha- 
meric characters. 

2 . A symbol begins with other than 
alpha characters. 

3. Excessive right parenthesis. 

4. Equal sign encountered in a sublist, 

5 . Any terminating character en- 
countered in an unexpected place. 

6. Mispunched op code causes un- 
expected syntax scan. 

7. A missing delimiter. 

8 . A special character that is not 
a valid delimiter but is used as 
a delimiter. 

9. A delimiter used illegally. 

10. A missing operand; nothing 
appearing between delimiters. 

11. Unpaired parenthesis. 

12. An embedded blank. 

Record has more than 187 char- 
acters 

Variable symbol is not declared in 
a define SET symbol statement or 
in a macro prototype. 

Single term logical expression is 
only valid for a SETB symbol. 



SET symbol previously defined. 



A SET symbol has been declared as: 

1. undimensioned but it is 
subscripted. 

2. subscripted but it is undimensioned. 

Attribute requested for a 
variable symbol which is not a sym- 
bolic parameter 

One or more relocatable Y-type con- 
stants in assembly; relocation may 
result in address greater than 2 
bytes in length. 

Sequence symbol previously 
defined. 



"1 

I 

H 



| Figure N-l. Assembler Diagnostic Error Messages (Part 4 of 14) 
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uoiot»8 

IJYJ 



IJQM9 

IJYJ 

IJQK)50 

IJYf 



IJQ1051 
IJYf 



Message 
+— 



IJQ1052 

ijy; 



UOJ053 

IJYf 

udpsu 

IJYJ 
IJQT056 

ijy; 



IJQ1057 

ijy} 



IJQ|p59 

IJYf 



SYMBOLIC PARAMETER 
PREVIOUSLY DEFINED OR 
SYSTEM VARIABLE 
SYMBOL DECLARED AS 
SYMBOLIC PARAMETER 

VARIABLE SYMBOL MATCHES 
A PARAMETER 

INCONSISTENT GLOBAL 
DECLARATIONS 



PROGRAMMER MACRO DEFIN- 
ITION PREVIOUSLY 
DEFINED 



Meaning 



NAME FIELD CONTAINS 
ILLEGAL SET SYMBOL 



GLOBAL DICATIONARY FULL 



LOCAL DICTIONARY FULL 



ARITHMETIC OVERFLOW 



SUBSCRIPT EXCEEDS 
MAXIMUM DIMENSION 



UNDEFINED SEQUENCE 
SYMBOL 



1. Symbolic parameter previously 
defined. 

System variable symbol declared 
as a symbolic parameter. 



Variable symbol matches a parameter. 



A global SET variable that is 
defined in more than one macro defi- 
nition, or in a macro definition and 
in the source program, is inconsis- 
tent in SET type or dimension. 

Programmer macro prototype opera- 
tion entry is identical to a: 

a. machine instruction. 

b. assembler instruction. 

c. previous programmer macro 
prototype . 

This message is not produced when 
a programmer macro matches a system 
macro. The programmer macro will 
be assembled with no indication of 
the corresponding system macro. 

SET symbol in name entry does 
not correspond to SET statement 
type. 

Global dictionary is full. Assembly 
is terminated. See Appendix H for 
dictionary size limits. 
Local dictionary is full. Assembly 
is terminated. See Appendix H for 
dictionary size limits. 
Intermediate or final result of an 
arithmetic operation is less than 
-231 or greater than 2 31 -1. 



1. 



SSYSLST or symbolic parameter 
subscript: 

a. exceeds 100 (200 for F 
assembler) . 

b. is negative. 

Symbolic parameter subscript is 
zero. 

SET symbol subscript exceeds 
dimension. 



Operand sequence symbol does not 
appear as a sequence symbol in a 
name field. 



\ Figure N-l. Assembler Diagnostic Error Messages (Part 5 of 14) 
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Message 

Code 
j. 

IJd060 
IJYJ 



IJQI061 
IJYJ 



IJQP62 

IJYJ 



Message 



30 < 



IJQp6 3 

IJYf 



IJO06U 
IJYf 



IJQ1065 
IJYJ 



IJQ1066 
IJYJ 



IJd067 

IJYJ 



IJQ1068 

IJSJ 

IJd069 
IJYJ 



rdo 

rdo 
rYj 



IJQI0 70 
IJYJ 



IJQI071 
IJYJ 



UQ1072 
IJYf 



i 



ILLEGAL ATTRIBUTE 
NOTATION 



ACTR COUNTER EXCEEDED 



GENERATED STRING GREATER 
THAN 127 [255] CHARACTERS 

EXPRESSION 1 OF SUBSTRING 
IS ZERO OR MINUS 

EXPRESSION 2 OF 
SUBSTRING IS ZERO OR 
MINUS 

INVALID OR ILLEGAL TERM 
IN ARITHMETIC RELATIONAL 
EXPRESSION 



UNDEFINED OR DUPLICATE 
KEYWORD OPERAND 



EXPRESSION 1 OF SUBSTRING 
GREATER THAN LENGTH OF 
CHARACTER EXPRESSION 

GENERATION TIME DICTIONARY 
AREA OVERFLOWED 

EXPRESSION 2 OF SUBSTRING 
GREATER THAN 8 CHARACTERS 

FLOATING POINT CHARACTER- 
ISTIC OUT OF RANGE 



ILLEGAL OCCURRENCE OF 
LCL, GBL, OR ACTR 
STATEMENT 

ILLEGAL RANGE ON ISEQ 
STATEMENT 



Meaning 



L* , S* f or I' requested for a 
parameter whose type attribute does 
not allow these attributes to be 
requested. 

Conditional assembly loop counter 
exceeded — conditional assembly 
terminated. 

Generated string is greater than 
127 characters for D assembler 
or 255 characters for F assembler. 
Expression 1 of substring is not 
allowed to be zero or minus. 

Expression 2 of substring is not 
allowed to be zero or minus . 



1. The parameter is not a 
self -defining term. 

2. The value of the SETC 
symbol used in the arithmetic 
expression is not composed of 
decimal digits. 

1. A keyword operand occurs 
more than once in a macro 
instruction. 

2- Keyword is not defined in 
prototype. 

Expression 1 of the substring is not 

allowed to be greater than the 

length of the character expression 

to which it refers . 

See Appendix H for dictionary 

size limits. 

Expression 2 of substring is not 
allowed to be greater than 8 . 

Exponent too large for length of 
defining field, exponent modifier 
has caused loss of all significant 
digits . 

Local or Global declaration, or ACTR 
statement is out of proper sequence. 



Operand of ISEQ statement has 
an illegal range. 
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Message 
Code 

I 

IJd07 3 

IJYJ 



IJQX)7l» 
IJYJ 



IJQK>75 

IJYf 



IJQ1P76 

IJYJ 

IJQ1077 

IJYf 



IJQ|p78 

ijy; 



IJQ|079 
IJYf 

IJQJ080 

IJYJ 



IJQ1081 

IJYf 

IJQI082 

IJYJ 



IJQ1083 

ijyj 



Ud08U 

IJYJ 



Message 

ILLEGAL NAME FIELD 



ILLEGAL STATEMENT IN 
COPY CODE OR SYSTEM 
MACRO 



ILLEGAL STATEMENT 
OUTSIDE OF A MACRO 
DEFINITION 



SEQUENCE ERROR 

ILLEGAL CONTINUATION 
CARD 



MACRO MNEMONIC OP-CODE 
TABLE OVERFLOW 



ILLEGAL STATEMENT IN 
MACRO DEFINITION 

ILLEGAL START CARD 



illegal format in gbl 
or lcl statement 

Illegal dimension 
specification in gbl 
or lcl statement 

set statement name 
field not variable 

SYMBOL 

ILLEGAL OPERAND FIELD 
FORMAT IN CONDITIONAL 
ASSEMBLY STATEMENT 



Meaning 

1. Name entry required to be blank I 
is not blank. 

2. Required name entry is missing. 

3 . Name entry required to be a 
sequence symbol is not a se- 
quence symbol. 

1 . Statement encountered in COPY 
code is not legal in COPY code. 

2. Statement encountered in system 
macro is not legal in system 
macro. 

Statement allowed only in a macro 
definition encountered in OPEN code, 
e.g., period asterisk (.*), mnote 
statement. 

Statement not in sequence specified 
by ISEQ instruction. 

1. Too many continuation cards. 

2 . Non blanks occur between the 
begin and continue columns of 
the continuation card. 

3 . Card not intended as continua- 
tion was treated as such be- 
cause of punch in continue 
column of preceding card. 

Macro mnemonic operation code 

table has an overflow. See Appendix 

H. 

This operation is not allowed 
within a macro definition. 

Statements affecting, or depending 
upon, the location counter have been 
encountered before a START state- 
ment. 

An operand is not a variable symbol. 



Dimension is other than 1-255. 



The name entry of a SET 
statement must be a variable 
symbol. 

Syntax invalid, e.g., AIF statement 
operand does not start with a left 
parenthesis or, sequence symbol 
missing in operand field of AIF or 
AGO statement. 
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Message 
Code 

H- 

IJCa08 5 

IJYJ 
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Message 



INVALID SYNTAX IN 
EXPRESSION 



Meaning 



IJQI086 

JIJYJ 



IJCI087 

ijy} 

IJQT088 

I IJYJ 



IJO1089 
IJYJ 



If 



IJOto90 
IJYI 



IJQJ091 
IJYJ 



IJQ1092 

IJYJ 



IJ0lp9 3 

IIJYf 



I Jd09 4 
I IJYJ 



L. 



■+- 

1, 

2. 
3. 

4. 






ILLEGAL USAGE OF SYSTEM | 
[VARIABLE SYMBOL 



NO ENDING APOSTROPHE 



UNDEFINED OPERATION 
CODE 



INVALID ATTRIBUTE 
NOTATION 



INVALID SUBSCRIPT 



INVALID SELF-DEFINING 
iTERM 



INVALID FORMAT FOR 
VARIABLE SYMBOL 



UNBALANCED PARENTHESES 
I OR EXCESSIVE LEFT 
PARENTHESES 



INVALID OR ILLEGAL 
NAME OR OPERATION IN 
PROTOTYPE STATEMENT 



2. 



Invalid delimiter. 
Too many terms in expression. 
Too many levels of parentheses. 
Two operators in succession. 

System variable symbol 
appears in: 

a. the name entry of a SET 
statement. 

b. a mixed-mode macro definition. 

c. a keyword macro definition. 

d. a GBL or LCL statement. 
6SYSLIST in context other than 
N* 6SYSLIST. 



End of card encountered before an 
ending apostrophe. 

ISymbol in operation code field does not 
j correspond to a valid machine or assem- 
bler operation code or to any operation 
code in a macro prototype statement. 

I The argument of the attribute 
reference must be a symbolic param- 
eter and the statement must be 

'within a macro definition. 

Syntax error, e.g., no right parenthesis 
after subscript, double subscript where 
single subscript is required, or single 
subscript where double subscript is 
required. 

1. Value is too large. 

2. Value is inconsistent with the data 
type, e.g., hex for decimal, etc. 

1- Variable symbol is longer 
than 8 characters. 

2. First character after the 
ampersand is not alphabetic. 

3. Failure to use double ampersand in 
TITLE card or character self- 
defining term. 

End of statement or card encountered 
before all parenthesis levels are 
satisfied. May be caused by embedded 
blank or other unexpected terminator, 
or failure to have a punch in 
continuation column. 

1. Name not blank or variable symbol. 

2. Variable symbol in name field is 
subscripted. 

3. Violation of rules for forming 
variable symbol, (must begin with 
ampersand (&) followed by 1-7 
letters and/or numbers first of 
which must be a letter) . 

4. Statement following 'MACRO' is 
not a valid prototype statement. 
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Message 
Code 



IJY095 



IJO1096 
IJYf 



IJ! 

IJY 



?97 



IJd098 

IJYJ 



IJQ1099 
IJYJ 



rotL( 



Message 



Meaning 



IJQflOO 

IJYf 



IJQtLOl 
IJY] 



ENTRY TABLE 
OVERFLOW 

MACRO INSTRUCTION OR 
PROTOTYPE OPERAND 
EXCEEDS 127 [225] 
CHARACTERS IN 
LENGTH 

INVALID FORMAT IN MACRO 
INSTRUCTION OPERAND OR 
PROTOTYPE PARAMETER 



Number of ENTRY symbols, i.e., 
ENTRY instruction operands, 
exceeds 100. 

Macro instruction or prototype 
operand length exceeds 127 
characters for D assembler and 
255 characters for F assembler 






1. 
2. 



3. 



<u 



5. 



6. 



Illegal equal sign (=)- 
A single ampersand (6) appears 
somewhere in the standard 
value assigned to a 
prototype keyword parameter. 
First character of a prototype 
parameter is not an ampersand. 
Prototype parameter is a 
subscripted variable symbol. 
Invalid usage of alternate 
format in prototype (see example) 
Nonsense prototype parameter, 
e.g.* SA* or £A££. 



Note: Occurrence of this error will 



cause only syntax to be checked for 
the remainder of the macro 
definition. 



Example: 

r t r r 1 

| | | | Continuation | 
| Name j Operation | Operand | Co lumn | 

|6A,SB, | j 

I or | | 

|6A,6B, j X | 

| &C | J 




EXCESSIVE NUMBER OF 
OPERANDS OR PARAMETERS 



POSITIONAL MACRO 

INSTRUCTION OPERAND, 

PROTOTYPE PARAMETER, 

OR EXTRA COMMA FOLLOWS 

KEYWORD 

STATEMENT COMPLEXITY 

EXCEEDED 

EOD on SYSIN or SYSIPT 



1. 



2. 



The prototype has more than 100 
(200 for F assembler) parameters 
The macro instruction has more 
than 100 (200 for F assembler) 
operands. 



Positional macro instruction 
operand, prototype parameter, 
or extra comma follows keyword. 



See Appendix H for statement com- 
plexity limits. 



End-of-data reached before an END 
statement was encountered. 



^ 
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I Message] 
I Code ' 



Message 



IJQQ.02 
IJYJ 



I JQtLO 3 
IJYJ 



IJQtL04 
IJYJ 



IJQU05 
IJYJ 



IJY106 



IJQU07 
IJYJ 

IJQ1L0 8 
IJYJ 

IJQU.09 
IJYJ 



IJY110 



INVALID OR ILLEGAL 
ICTL 



ILLEGAL NAME IN 
OPERAND FIELD OF COPY 
CARD 

COPY CODE NOT FOUND 



EOD ON SOURCE STATE- 
MENT LIBRARY 



NOT NAME OF DSECT 



INVALID OPERAND 



PREMATURE EOD 



PRECISION LOST 



EXPRESSION VALUE 
TOO LARGE 



"1 



Meaning 
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1. Operands of ICTL statement are 
out of range. 

2. ICTL is not the first statement 
in the input deck. 

Syntax error, e.g. , symbol has an 
illegal character or has more than 
8 characters . 

The operand of a COPY statement 
specified COPY text which cannot be 
found in the library. 

1. MEND statement missing from macro 
definition. 

2. While editing a macro, COPY code 
not found. Macro definition 
truncated. 

3. End-of-file encountered while read- 
ing a macro or copy code. 



Referenced symbol expected to be DSECT 
name , but it is not . 

Operand unrecognizable, contains 

invalid value, or incorrectly 

specified. 

Indicates a machine error or an 

internal assembler error. 

High order information lost by 
attempting to express constant in a 
field not long enough to contain it. 

Value of expression greater than 
-16777216 to +16777215. 
Expressions in EQU and ORG statements 
are flagged if (1) they include terms 
previously defined as negative values, 
or (2) positive terms give a result 
of more than three bytes in magnatude. 
The error indication may be erroneous 
due to (1) the treatment of negative 
values as three-byte positive values, 
or (2) the effect of large positive 
values on the location counter if a 
control section begins with a START 
statement having an operand greater 
than zero, or a control section is 
divided into subsections. 

NOTE: Messages ending with an I are printed on 
both SYSLST and SYSLOG unless one of the messages 
indicates that SYSLST or an unidentifiable unit is 
defective, in which case they will appear on SYSLOG 
only. The messages appearing on SYSLOG will be 
prefaced by "A" regardless of which assembler pro- 
duced them. 1101 and 1111 errors can be detected 
at any point during assembly — amount of assembly 
listing printed is unpredictable. 1121 through 
1151 errors are detected immediately upon assembly 
attempt — no assembly listing is printed. In either 
case the assembly is terminated, the source is bypassed 
to a /* or EOF, and control is returned to the super- 
visor via EOJ. The subsequent steps of a multiple 
I j step JOB are not bypassed unless they are also defective. 

I Figure N-l . Assembler Diagnostic Error Messages (Part 10 of 14) 
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Message 
Code 



Message 



Meaning 



IJQlllOl 
IJYJ 



ABORT — PERM I/O ERROR 
ON SYSxxx 



IJQ1111I 
IJYJ 



ABORT — UNEXPECTED 
EOF ON SYSxxx 



Cause : An unrecoverable error on the named file 
prevents further processing: If the named file 
is SYSxxx, the unit code of the DTF that caused 
the error does not match any valid unit. This is 
usually the result of an accidental overlap that 
destroys the DTF. 

This is probably a hardware error. 

System Action ; The job step is terminated. 

Programmer Action : Rerun the job using another 
disk pack or tape reel, or use another unit for 
the disk pack or tape reel. 

If the problem recurs, do the following to complete 
your problem determination action: 

1. Execute the ROD cqmmand and EREP, and retain the 
output . 

2. Have the job stream and system log available. 

Operator Action : Execute the LISTIO command for 
SYSxxx to determine the physical unit to which it 
is assigned. Move the disk pack or tape reel to 
another physical device and reassign SYSxxx to that 
unit, 

or 

mount another disk pack or tape reel and rerun 
the job. 

Cause : EOF has occurred on an assembler work file 
that does not support multi-volume files. It 
usually results from a short tape, 

or 

a tape indicate reflective marker was read. 

This is probably a user error. 

System Action : The job step is terminated. 

Programmer Action : If the problem recurs, have the 
system log, printer output, and the job stream 
available to complete your problem determination 
action. 

Operator Action : If SYSxxx is assigned to a tape, 
mount a longer tape, or use a 1600 BPI tape drive 
instead of an 800 BPI drive, 

or 

reassign the work files to disk and rerun the job, 

or 

if SYSxxx is assigned to a disk, submit larger 
extents and rerun the job. 



•Figure N-l. Assembler Diagnostic Error Messages ^Part 11 of 14) 



162 



Page of GC24-3414-7 
Revised August 21, 1970 
By TNL GN33-8087 



Message 
Code 



Message 



Meaning 



IJQ1112I 
IJYj 



ABORT — INADEQUATE 
CORE FOR 32L [44k| 
ASSEMBLER 



IJQ 1131 



ABORT — INVALID 
PHYSICAL UNIT FOR 
SYSxxx 



Cause : An attempt was made to execute the [32KJD 
assembler in less than 14K, or the F assembler in 
less than 44K. 

This is probably a user error. 

System Action ; The job step is terminated. 

Programmer Action ; If there is insufficient main 
storage available, you must link edit a smaller 
assembler. 

If the problem recurs, do the following to complete 
your problem determination action: 

1. Execute the MAP command and retain the output. 

2. Have the printer output available. 

Operator Action ; Execute the MAP command to deter- 
mine the partition size. Then allocate a larger 
partition for the assembly. 

Cause : The assignments for a work file(s) are not 
valid: 

• The device type is not valid, or the assembler 
is link edited for different devices than those 
assigned. 

• The UA (unassign) or IGN (ignore) option was 
specified for the D assembler. 

• The specified mode setting is not valid. 

• For the D assembler, the work file device types 
are not consistent. (SYS003 is correct.) 

Only the first invalid unit is named in the message 

This is probably a user error. 

System Action : The job step is terminated. 

Programmer Action : Use the LISTIO output to deter- 
mine the cause for the message. Use CSERV to 
display the phase named "ASSEMBLY" and check byte 
X'lC, bits 5, 6, and 7 for the device type speci- 
fied at link edit time as work files. 



Bit 5 
Bit 6 
Bit 7 



1=2400 
1=2314 

1=2311 Correct the assignments and 
resubmit the job. 



If the problem recurs, do the following to complete 
your problem determination action: 

1. Have the LISTIO and CSREV output available. 

2. Have the job stream and system output available. 

Operator Action : Issue the LISTIO command to check 
the assignments and enter the correct work file 
assignments if possible. 



r 
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Message 
Code 



Message 



Meaning 



IJQ 1141 



ABORT — NO UNIT 

ASSIGNED FOR 

SYSPCH 

(for D assembler) 



IJY 1141 



ABORT — NO UNIT 
ASSIGNED FOR SYSxxx 

(OPTION SYM) 

(for F assembler) 



IJY 1151 



ABORT — INVALID DUAL 
ASSGN SYSPCH- 
SYSIPT [SYSLST] 



Cause : For the D assembler, the OPTION [deck] is 
in effect and SYSPCH is not assigned. 

This is probably a user error. 

System Action : The job step is terminated. 

Programmer Action : Submit an assign for SYSPCH/ 

or 

specify OPTION [NODECK] and resubmit the job. 

If the problem recurs , do the following to complete 
your problem determination action: 

1. Retain the LISTIO listing. 

2. Have the job stream, program listing, and system 
log available. 

Operator Action : Execute the LISTIO command and 
verify assignments. Submit an assign for SYSPCH 
and rerun the job. 

Cause : For the F assembler, a required unit 
(SYS001-SYS003 or a device required by an OPTION 
statement) is unassigned, or the IGN option is spe- 
cified for the device. The IGN (ignore) option is 
valid for SYSPCH and SYSLST. 

This is probably a user error. 

System Action : The system terminates the job step. 

Programmer Action : Submit an assignment for the 
indicated logical unit, 

or 

correct the OPTION statement to eliminate the 
requirement and resubmit the job. 

If the problem recurs, have the LISTIO listing, the 
system log, the job stream, and the printer output 
available to complete your problem determination 
action. 

Operator Action : Execute the LISTIO command and 
verify the assignments . Submit an assign for the 
indicated logical unit and rerun the job. 

Cause : SYSPCH and SYSIPT are both assigned to the 
same unit, which is not a 1442N1 or 2520B1 card 
reader, 

or 

SYSPCH and SYSLST are both assigned to the same 
unit, which is not a disk. 
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i Message i i 

J Code J Message J Meaning 


IS j This is probably a user error. 

J| J System Action: The job step is terminated. 

! ! j Programmer Action: Check the LISTIO listing to 
j[ j determine the dual assignments. Reassign the indi- 
ii i cated logical units to separate devices, or the 
J | J required device type . 

ii i If the problem recurs, retain the LISTIO output, 
J | J the job stream, system log, and supervisor listing 
j j J to complete your problem determination action. 

! ! j Operator Action: Execute LISTIO to determine the 
j j J current assignments. Reassign the two indicated 
ii i logical units to separate devices or to the required 
j j J device type. 



_________________________________ ___J-_ ________________________________ _ — __ — — ___ I, 
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APPENDIX 0; SELF-RELOCATING PROGRAM TECHNIQUES 



,y 



Self-relocating programs are executed in a 
multiprogramming environment and at any 
location in main storage. These programs 
may be located in either foreground area of 
main storage- A program that is self- 
relocating must initialize its address 
constants, including Channel Command Words 
(CCWs), at execution time. The user must 
code his own self-relocating routine for 
execution after it is linkage edited and 
loaded into main storage. 

When coding a self- relocating program, 
the programmer should take these points 
into consideration: 

1. All A-type address constants must be 
relocated. 

2. The I/O area addresses in all CCWs must 
be relocated. 

3. Address constants generated by Physical 
IOCS macros (EXCP, WAIT, etc.) must be 
relocated. 

4. Logical IOCS macros can be self- 
relocated using the OPENR macro. 

The following example program shows how 
a user may code a self- relocating program. 
This example uses the A-type constant and 
registers 1 and 2 although the user may use 
any of the other available registers if he 
choos es . 



This program contains six address 
constants. Two are A-type and two each are 
contained in the Command Control Block 
(CCB) and the Channel Command Word (CCW) 
macros. This procedure is used: 



1. The absolute addresses of the contents 
of the two A-type constants (EOFTAPE 
and CHA12) and the CCW for each CCB 

(PRINTCCW and TAPECCW) are loaded into 
a work register (Register 1). 

2. The work register is stored in the 
address constants [A (EOFTAPE) and 
A(CHA12)] and in their respective CCBs 
(PRINTCCB+8 and TAPECCB+8). 

3. The command code for the CCWs shares a 
full word with the I/O area address and 
must be reset after the I/O area 
address has been stored. This is done 
here by two methods: (a) saving the 
command code for the PRINTCCW in Reg- 
ister 2 and then restoring it; (b) 
using the Move Immediate (MVI) instruc- 
tion for the TAPECCW to set the command 
code. 

In the main routine of this program, 
note that register notation has been used 
with the EXCP and WAIT macros to avoid the 
generation of address constants by the 
macros themselves. The example of a self- 
relocating program follows: 
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SOURCE STATEMENT 





PRINT 


NOGEN 


PROGRAM 


START 







BALR 


15,0 




USING 


*,15 


* ROUTINE TO RELOCATE ADDRESS CONSTA 




LA 


1, PRINTCCW 




ST 


l,PRINTCCB+8 




LA 


1, TAPECCW 




ST 


1, TAPECCB +8 




LA 


l f EOFTAPE 




ST 


1, AEOFTAPE 




LA 


1,CHA12 




ST 


1, ACHA1.2 




IC 


2, PRINTCCW 




LA 


1, OUTAREA 




ST 


1, PRINTCCW 




STC 


2, PRINTCCW 




LA 


1, INAREA 




ST 


1, TAPECCW 




MVI 


TAPECCW, 2 


* MAIN ROUTINE... RE AD TAPE AND PRINT 


READTAPE 


LA 


1, TAPECCB 




EXCP 


(1) 




WAIT 


(1) 




L 


10, AEOFTAPE 




BAL 


1 a, CHECK 




MVC 


OUTAREA (10), INAREA 




MVC 


OUTAREA+15 ( 70) , INAREA +10 




MVC 


OUTAREA+90(20) ,INAREA+80 




LA 


1, PRINTCCB 




EXCP 


(1) 




WAIT 


(1) 




L 


10,ACHA12 




BAL 


14, CHECK 




B 


READTAPE 


CHECK 


TM 


4(1), 1 




BCR 


1,10 




BR 


14 


CHA12 


MVI 


PRINTCCW, X'SB* 


• 


EXCP 


(1) 




WAIT 


(1) 




MVI 


PRINTCCW, 9 




BR 


14 


EOFTAPE 


EOJ 






CNOP 


0,4 


PRINTCCB 


CCB 


SYS004, PRINTCCW, X* 0400 • 


TAPECCB 


CCB 


SYS0 01, TAPECCW 


PRINTCCW 


CCW 


9, OUTAREA, X* 20', 110 


TAPECCW 


CCW 


2, INAREA, X* 20", 100 


AEOFTAPE 


DC 


A (EOFTAPE) 


ACHA12 


DC 


A(CHA12) 


OUTAREA 


DC 


CL110' • 


INAREA 


DC 


CL100* • 




END 


PROGRAM 



RELOCATE CCW ADDRESS 

IN CCB FOR PRINTER 
RELOCATE CCW ADDRESS 

IN CCB FOR INPUT TAPE 
♦RELOCATE***** 

* PROGRAM * 

* ADDRESS * 
♦♦♦♦CONSTANTS* 

SAVE PRINT CCW OP CODE 
RELOCATE OUTPUT AREA ADDRESS 

IN PRINTER CCW 
RESTORE PRINT CCW OP CODE 
RELOCATE INPUT AREA ADDRESS 

IN TAPE CCW 
SET TAPE CCW OP CODE TO READ 
RECORDS 

GET CCB ADDRESS 
READ ONE RECORD FROM TAPE 
WAIT FOR COMPL. OF I/O 
GET ADDRESS OF TAPE EOF ROUTINE 
GO TO UNIT EXCEPTION SUBROUTINE 
EDIT RECORD 

IN 

OUTPUT AREA 
GET CCB ADDRESS 
PRINT EDITED RECORD 
WAIT FOR COMPL. OF I/O 
GET ADDRESS OF CHAN 12 ROUTINE 
GO TO UNIT EXCEPTION SUBROUTINE 

CHECK FOR UNIT EXC. IN CCB 
YES-GO TO PROPER ROUTINE 
NO- RETURN TO MAINLINE 

SET SK TO CHAN 1 OP CODE 

SK TO CHAN 1 IMMEDIATELY 

WAIT FOR COMPL. OF I/O 

SET PRINTER OP CODE TO WRITE 

RETURN TO MAINLINE 

END OF JOB 

ALIGN CCB'S TO FULL WORD 



164 



APPENDIX P. 



SAMPLE MACRO DEFINITIONS 



v . ., '' 



The macro definitions in this appendix 
are typical applications of the macro 
language and conditional assembly. Another 
macro definition is included as part of 
Appendix I. The definitions are presented 
along with statements generated from 
typical corresponding macro instructions. 

The first macro definition is NOTE — 
a DOS system macro taken from the source 
statement library of the DOS assembler. 



The second macro definition is MOVE. 
This macro is recursive; i.e., it calls 
itself as an inner macro. Compare this 
macro definition with MOVE in Appendix I 
MOVE in Appendix I has more statements , 
however it functions differently and 
includes error checking facilities . 



MACRO 
&LABEL NOTE tFILEN 
.* IBM SYSTEM/360 TAPE/DISK 
* CHANGE LEVEL 2-0 



OPERATING SYSTEM 





AIF 


(T'&FILEN NE 


'0 


• ) 


.ONE 






MNOTE 


0, 'NO FILENAME 


SPECIFIED. SET 


TO ••*««• 


&LABEL 


L 


1,=A(») 






»***»ERROR-PATCH DTF TABLE AD 




AGO 


.THREE 










.ONE 


AIF 


C&FILEN' (I, 


1) 


NE 


• ( • ).TW0 






AIF 


( "CFILENU) • 


EQ 


• 


1« ).F0UR 




&LABEL 


LR 
AGO 


ltCFILENd) 

.THREE 






GET 


DTF TABLE ADDRESS 


.TWO 


ANOP 












&LABEL 


L 


1, = AUFILEN) 






GET 


DTF TABLE ADDRESS 


.THREE 


L 

AGO 


15, 16(1) 
.FIVE 






GET 


LOGIC MODULE ADDRESS 


.FOUR 


ANOP 












CLABEL 


L 


15,16(1) 






GET 


LOGIC MODULE ADDRESS 


.FIVE 


BAL 


14, 12(15) 






BRANCH TO NOTE ROUTINE 




MEND 













STATEMENTS GENERATED FROM NOTE MACRO INSTRUCTIONS 



SYMBOL AS OPERAND 



NNAME NOTE 
+* CHANGE LEVEL 
+NNAME L 
+ L 

+ BAL 



INFILE 

2-0 

1,=A(INFILE) GET DTF TABLE ADDRESS 

15,16(1) GET LOGIC MODULE ADDRESS 

14,12(15) BRANCH TO NOTE ROUTINE 



REGISTER 1 AS OPERAND 



NOTE (1) 
+♦ CHANGE LEVEL 2-0 
+ L 

+ BAL 



15,16(1) GET LOGIC MODULE ADDRESS 
14,12(15) BRANCH TO NOTE ROUTINE 



* OTHER REGISTER AS OPERAND 

NOTE (5) 
+* CHANGE LEVEL 2-0 

+ LR 1,5 GET DTF TABLE ADDRESS 

+ L 15,16(1) GET LOGIC MODULE ADDRESS 

+ BAL 14,12(15) BRANCH TO NOTE ROUTINE 
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OMITTED OPERAND 



NOTE 
+* CHANGE LEVEL 2-0 



0,N0 FILENAME SPECI FI ED. SET TO •»• 
L 1,=A(») *»»**ERROR-PATCH DTF TABLE ADDRESS 
L 15,16(1) GET LOGIC MODULE ADDRESS 
BAL 14,12(15) BRANCH TO NOTE ROUTINE 



SNAME 



MACRO 

MOVE £FROM,&TO,CCOUNT 



RECURSIVE GENERAL PURPOSE MOVE MACRO 





GBLA 


SA 




LCLA 


SB 


SB 


SETA 


SCOUNT 


.PN 


AIF 


(SB LE 256). DO 


SNAME 


MVC 


STO+SA. (256) ,£FROM+SA 


£A 


SETA 


SA+256 


SB 


SETA 


SB-256 




MOVE 


SFROM,STO,SB 




MEXIT 




.DO 


ANOP 




SNAME 


MVC 


STO+SA. (SB) ,SFROM+SA 


SA 


SETA 

MEND 






MOVE LESS THAN 256 BYTES 
256 BYTE MOVE 



CALL THYSELF 



LESS THAN 256 BYTE MOVE 
SET BACK TO FOR NEXT CALL 



STATEMENTS GENERATED FROM MOVE MACRO INSTRUCTIONS 



MOVE LESS THAN 256 BYTES 



MNAME MOVE FRMAD, TOAD , 1'50 
+ MNAME MVC TOAD+0 ( 150 ) ,FRMAD+0 LESS THAN 256 BYTE MOVE 



MOVE 256 BYTES 

MOVE FRMAD, TOAD, 256 

MVC T0AD+0<256) ,FRMAD+0 LESS THAN 256 BYTE MOVE 



* MOVE MORE THAN 256 BYTES 

MNAME2 MOVE FRMAD , TOAD, 400 

+MNAME2 MVC TOAD+0 (256 ), FRMAD+O 256 BYTE MOVE 

+ MVC TOAD+2561144) ,FRMAD+256 LESS THAN 256 BYTE MOVE 



MOVE MORE THAN 512 BYTES 

FRMAD, TOAD, 520 

TOAD+01256) ,FRMAD+0 256 BYTE MOVE 
T0AD+256(256) .FRMAD+256 256 BYTE MOVE 
T0AD+512(8),FRMAD+512 LESS THAN 256 BYTE MOVE 





MOVE 


+ 


MVC 


+ 


MVC 


+ 


MVC 
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&SYS, restrictions on use 63, 75, 88 
&SYSECT (see Current control section name) 
&SYSLIST (see macro instruction operand) 
&SYSNDX (see macro instruction index) 
7090/7094 Support Package Assembler 8, 140 
Absolute terms 15 
ACTR instruction 84 
Address constants 47 

A- type 47 
Complex relocatable expressions 47 

Literals not allowed 20 

S-type 48 

V-type 48 

Y-type 47 
Address specification 34 
Addressing 24 

Dummy sections 29 

Explicit 24 

External control sections, 32 

Implied 24 

Relative 26 
AGO instruction 83 

Example 83 

Form of 83 

Inside macro definitions 83 

Operand field of 83 

Outside macro definitions 83 

Sequence symbol in 83 

Use of 83 
AIF instruction 82 

Example of 82 

Form of 82 

Inside macro definitions 82 

Invalid operand fields of 83 

Logical expression in 82 

Operand field of 82 

Outside macro definitions 82 

Sequence symbols in 82 

Use of 82 

Valid operand fields of 83 
Alignment, boundary 

CNOP instruction for 55 

Machine instruction 33 
Ampersands in 

Character expressions 79 

Macro-instruction operands 6 6 

MNOTE instruction 87 

Symbolic parameters 63 

Variable symbols 59 
ANOP instruction 84 

Example of 84 

Form of 84 

Sequence symbol in 84 

Use of 84 
Apostrophes in 

Character expressions, 78 

Macro instruction operands 66 



Apostrophes (continued) 

MNOTE instruction 87 
Arithmetic expressions 

Arithmetic relations 81 
Evaluation procedure 76 
Invalid examples of 76 
Operand sublists 77 
Operators allowed 75 
Parenthesized terms in 76 

evaluation of 76 

examples of 76 
SETA instruction 75 
SETB instruction 80 
Substring notation 78 
Terms allowed 75 
Valid examples of 75 

Arithmetic relations 81 
Arithmetic variable 91 
Assembler instructions 

Statement 38 

Table 117 

(see specific instructions) 

Assembler language 8 

Basic Programming Support 8, 140 

Coding conventions 11 

Comparison chart 140 

Macro facilities relation to 58 

Statement format 13 

Structure 15, 16 
Assembler program 

Basic functions 9 

DOS/TOS relationship 10 

Listing 131 

Output 27, 151 

Variants 149 
Assembler relationships 10 
Assembling a Program 143 

Assemble-and-execute 8, 145, 148 

Card Input 143, 145, 148 

Device Assignments 144 

Diagnostic Error Messages 152 

I/O Units Used 146, 147 

Operating Considerations 144 

Output 150 
Assembly, terminating an 57 
Assembly no operation (see ANOP 

instruction) 
Attributes 71 

How referred to 72 

Inner macro instruction operands 71 

Kinds of 71 

Notations 71 

Operand sublists 71 

Outer macro instruction operands 71 

Summary chart of 124 
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Attributes (continued) 

Use of 71 

(see also specific attributes) 
Basic Programming Support Assembler 8, 140 
Base registers 

Address calculation 10, 32, 34 

DROP instructions 24 

Loading of 24 

USING instructions 24 
Binary constant 44 
Binary self-defining term 18 
Binary variable 91 
Bit length specification 40.1 

Multiple constants 40.1 

Multiple operands 41 

Duplicated constants 41 
Blanks 

Logical expressions 80 

Macro instruction operands 67 

CCW instruction 50 
Channel command word, defining 50' 
Character codes 9 8 
Character constant 42 
Character expressions 78 
Ampersands in 78 
Character relations 81 
Concatenating 79 
Examples of 78 
Periods and 78 
Apostrophes in 78 
SETB instructions 80 
SETC instructions 77 
Character relations 81 
Character self-defining term 19 
Character set 14, 15, 98 
Character variable 91 
CNOP instruction 55 
Coding form 12 
COM instruction 30 

Commas, macro instruction operands 67 
Comments entries 13 
Comments statements 

Examples of 14, 65 
Model statements 65 
Not generated 65 
Comparison chart 140 
Compatibility 

Assembler language 8 
Macro-definitions 97 
Complex relocatable expressions 47 
Concatenation 

Character expressions 78, 79 
Defined 64 
Examples of , 64 
Substring notations 78 
Conditional assembly elements , summary 

charts of 85, 123 
Conditional assembly instructions 
How to write 70 
Summary of 85 
Use of 70 

(see also specific instructions) 
Conditional branch (see AIF instruction) 
Constants (see also specific types) 
Defining (see DC instructions) 
Summary of 120 
Continuation lines 11 



Conditional branch instruction 36 

Operand format 37 
Control section location assignment 28 
Control sections 

Blank common 30 

CSECT instruction 28 

Defined 27 

DSECT instruction 29 

First control section, properties of 
28 

START instruction 28 

Unnamed 29 
COPY instruction 56 
COPY statements in macro definitions 

Form of 65 

Model statements, contrasted 65 

Operand field of 65 

Use of 65 
Count attribute 

Defined 73 

Notation 71 

Operand sublists 73 

Use of 73 

Variable symbols 73 
CSECT instruction, symbol in, length 

attribute of 28 
Current control section name (&SYSECT) 

Affected by CSECT, DSECT, START 93 

Example of 93 

Use of 93 

Data definition instructions 39 
Channel command words 50 
Constants 39 
Storages 48 
Data representation 10 
DC instruction 39 

Duplication factor operand subfield 40 
Operand subfield modifiers 40 
Type operand subfield 40 

Length modifier 40 

Scale modifier 41 

Exponent modifier 42 
Constant operand subfield 42 

Address-constants (see address 

constants) 
Binary constant 44 
Character constant 42 
Decimal-constants 46 
Fixed-point constants , 
Floating-point constants 
Hexadecimal constant 



44 



45 



43 



41 

46 
46 
46 



Type codes for 
Decimal constants 

Length modifier 

Length , maximum 

Packed 45 

Zoned 45 
Decimal field, integer attribute of 
Decimal self-defining terms 78 
Defining constants (see DC instruction) 
Defining storage (see DC instruction; 

DS instruction) 
Defining symbols 17, 70 
Diagnostic Error Messages 152 
Dimension, subscripted SET symbols 
Displacements 34 
Double-shift instruction 33 
DROP instruction 25, 33 



74 



91 
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DS instruction 48 
Defining areas 49 
Forcing alignment 49 

DSECT instruction 29 

Dummy section location assignment 

Duplication factor 40 
Forcing alignment 49 



29, 31 



Effective address length 35 

EJECT instruction 51 

END instruction 57 

ENTRY instruction, 31 

Entry point symbol, identification of 31 

EQU instruction 38 

Equal signs, as macro instruction operands 

66 
Error message (see MNOTE instruction) 
Error Messages 152 

After END statement 57 
Explicit addressing 24, 34 

Length 34 

Exponent modifiers 42 



Expressions 


21, 3 


Absolute 


34 


Character 


78 


Evaluation 


22 


Logical 


81 


Relocatable 


34 



Summary chart of 



124 



36 



Extended mnemonic codes 

Operand format 37 

Table 108 
External control section, addressing of 

31 
External symbol, identification of 
EXTRN instruction 31 



31 



First control section 28 
Fixed-point constants 44 

Format 44 

Positioning of 44 

Scaling 44 

Values minimum and maximum 44, 45 
Fixed-point field, integer attribute of 

74 
Floating-point constants 45 

Alignment 46 

Format 45 

Scale modifiers 45 
Floating-point field, integer attribute 

of 74 
Format control, input 53 



GBLA instruction 

Form of 8 8 

Inside macro definitions 88 

Outside, macro definitions 8 8 

Use of 88 
GBLB instruction 

Form of 88 

Inside macro definitions 88 

Outside macro definitions 8 8 

Use of 88 
GBLC instruction 

Form of 8 8 



GBLC instruction (continued) 

Inside macro definitions 88 
Outside, macro definitions 88 
Use of 88 

General register zero, base register 
usage 25 

Generated statements, examples of 64 

Global SET symbols 
Defining 88 
Examples of 88, 90 
Local SET symbols, compared 87 
Using 88 

Global variable symbols 
Types of 87 

(see also global SET symbols, sub- 
scripted SET symbols) 

Hexadecimal constants 43 
Hexadecimal-decimal conversion chart 9 8 
Hexadecimal self-defining terms 18 



I' (see Integer attribute) 
ICTL instruction 52 
Identification-sequence field 14 
Identifying blank common control section 

30 
Identifying assembly output 51 
Identify dummy section 29 
Implied addressing 24, 34 

Length 34 
Implied length specification 34 
Inner macro instruction 

Defined 68 

Example of 69 

Symbolic parameters in 69 
Instruction alignment 33 
Instruction format 14 
Integer attributed 

Decimal fields 74 

Examples of 74 

Fixed-point fields 73 

Floating-point fields 74 

How to compute 74 

Notation 71 

Restrictions on use 74 

Use of 74 
ISEQ instruction 53 



K 1 (see Count attribute) 
Keyword 

Defined 9 4 

Keyword macro instruction 9 4 
I Symbolic parameter and 9 3.1 
Keyword, inner macro instructions used 

in 95 
Keyword macro definition 

Positional macro definitions 
I compared 9 3.1 

Use 94 
Keyword macro instruction 

Example of 9 5 

Format of 94 

Keywords in 9 4 

Operands 58, 9 4 

Invalid examples 95 

Valid examples 95 
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Keyword macro instruction (continued) 
Operand sublists in 95 
Keyword prototype statement 
Examples of 94 
Format of 94 
Operands 9 4 

Invalid examples 9 4 
Valid examples 94 
Standard values 94 

L 1 (see Length attribute) 
LCLA instruction 

Form of 75 

Use of 75 
LCLB instruction 

Form of 75 

Use of 75 
LCLC instruction 

Form of 75 

Use of 75 
Length modifier 40 

Bit length specification 40.1 
Lengths explicit and implied 34, 35 
Length attribute 

Defined 34, 72 

Examples 73 

Notation 71 

Restrictions on use 73 

Symbols 17, 73 

Use of 73 
Length modifier 40 

Length subfield 33 
Level of parentheses 21 
Library, copying coding form 56 
Linkage symbols (see also ENTRY instruc- 
tion; EXTRN instruction) 

Entry point symbol 31 

External symbol 31 

Linkage editor and 
use of 31 
Listing, spacing 52 
Listing control instructions 51 
Literal pools 20, 54, 55 

Segments one to four 55 
Literals 20 

Character 34 

DC instruction, used in 20 

Duplicate 21 

Format 20 

Literal pool, beginning 55 

Literal pools, multiple 20 

Treatment of self-defining term 20 
Local SET symbols 

Defining 88 

Examples of 88-90 

Global SET symbols, compared 87 

Using 88 
Local variable symbols 

Types of 87 

(see also local SET symbols) 

(see also subscripted SET symbols 
Location counter 38, 42, 47 



Predefined symbols 
References to 19 
Setting 54 
Logical expressions 

AIF instructions 82 
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Logical expressions (continued) 
Arithmetic relations 81 
Blanks in 81 
Character relations 81 
Evaluation of 81 
Invalid examples of 81 
Logical operators in 81 
Parenthesized terms in 

Evaluation of 81 
• Examples of 81 
Relation operators in 81 
SETB instructions 80 
Terms allowed in 81 
Valid examples of 81 
LTORG instruction 55 
Machine features required 7 
Machine instructions 33 

Alignment and checking 33 
Length 34 

Literals, limits on 20 
Mnemonic operation codes 35 
Operand fields and subfields 33 
Symbolic operand formats 35 
Machine-instruction mnemonic codes 35 

Alphabetical listing 108 
MACRO 

Form of 61 
Use 61 
Macro definition 

Compatibiltiy 9 7 

Defined 61 

Example of 6 3 

How to prepare 61 

Keyword (see Keyword macro definition) 

Mixed-mode (see Mixed-mode macro 

definition) 
Placement in source program 61 
Sample 133, 165, 166 
Use 61 
Macro definition exit (see MEXIT instruc- 
tion) 
Machine instruction examples and format 
RR .33, 35 
RX 33, 36 
RS 33, 36 
SI 33, 36 
SS 33, 36 
Summary table 106 
Macro definition header statement (see 

MACRO) 
Macro definition trailer statement (see 

MEND) 
Macro facility 

Additional features 86 
Comparison chart 142 
Relation to assembler language 58 
Summary 85, 121 
Macro instruction 
Defined 58 
Example of 6 7 
Form of 66 
How to write 66 
Levels of 69 
Inner 68 

Mnemonic operation code 66 
Name entry of 66 
Omitted operands 6 7 
Example of 67 
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Macro instruction (continued) 

Operand entry of 66 

Operands 

Ampersands 66 
Blanks 67 
Commas 67 
Equal signs 66 
Paired parentheses 66 
Paired apostrophes 66 

Operand sublists 6 7 

Operation entry of 66 

Outer 68 

Statement form 67 

Types of 58 

Used as model statement 6 8 
Macro instruction index (&SYSNDX) 

AIF instruction 91 

Arithmetic expressions 91 

Character relation 91 

Example 92 

MNOTE instruction 91 

SETB instruction 91 

SETC instruction 91 

Use of 91 
Macro instruction operand (&SYSLIST) 

Attributes of 9 3 

Use of 93, 96 
(see also symbolic parameters) 
Macro instruction prototype statement 

(see prototype statement) 
Macro instruction statement (see macro 

instruction) 
MEND 

Form of 61 

MEXIT instruction, contrasted 86 

Use of 61 
MEXIT instruction 

Example of 86 

Form of 86 

MEND, contrasted 86 

Use of 86 
Mixed-mode macro definitions 

Positional macro definitions 
contrasted 96 

Use 96 
Mixed-mode macro instruction 

Example of 96 

Form of 96 

Operand field of 58, 96 
Mixed-mode prototype statement 

Example of 96 

Form of 96 

Operands of 96 
Mnemonic operation codes 35 

Extended 37 

Machine instruction ' 35 

Macro instruction 61 
MNOTE instruction 

Ampersands in 86 

Error message 86 

Example of 86 

Operand entry of 86 

Apostrophes in 86 

Severity code 86 

Use of 86 
Model statements 

Comments field of 63 

Comments statements 65 



Model statements (continued) 

Defined 62 

Name field of 6 2 

Operation field of 62 

Operand field of 6 3 

Use of 62 
N' (see Number attribute) 
Name entries 13 
Number attribute 

Defined 73 

Notation 73 

Operand sublist 73 

Object deck 150 
Object module 27 
Operands 

Entries 13 
Fields 33 
Subfields 33, 34 
Symbolic 31, 33, 35 
Operand Sublist 

Alternate statement form 67 
Defined 67 
Example of 6 8 
Use of 67 
Operation codes 
Assembler 9 
Machine 9 
Operations entries 13 
Operation field 33 
Ordinary symbol 17 
ORG instruction 54 
Outer macro instruction defined 68 
Paired parentheses 66 
Paired apostrophes 66 
Parentheses in 

Arithmetic expressions 76 
Logical expressions 81 
Macro instruction operands 66 
Operand fields and subfields 34 
Paired 66 
Period in 

Character expressions 78 
Comments statements 65 
Concatenation 65 
Sequence symbols 74 
Positional macro definition (see macro 

definition) 
Positional macro instruction (see macro 

instruction) 58 
Previously defined symbols 18 
PRINT instruction 52 
Program control instructions 53 
Program listings 10 

Program sectioning and linking 16, 24, 27 
Prototype statement 
Alternate 62 
Example of 62 
Form of 61 

Keyword (see keyword prototype state- 
ment) 
Mixed-mode (see mixed-mode prototype 
statement) 

Name entry of 61 
Operand entry of 61 
Operation entry of 61 
Statement form 61 
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Prototype statement (continued) 
Symbolic parameters in 61 
Use of 61 

PUNCH instruction 54 



Relational operators 81 
Relative addressing 26 
Relocatability 10, 15 

Attributes 31 

Program, general register zero 25 
Relocatable expressions 23, 33 

In USING instructions 25 
Relocatable symbols 17 
Relocatable terms 

Pairing of 22 

In relocatable expressions 23 

REP card 151.2 

REPRO instruction 54 

RR machine instruction format 33 

Length attribute 33 

Symbolic operands 35 
RS machine instruction format 33 

Address specification 34 

Length attribute 33 

Symbolic operands 35 
RX machine instruction format 33 

Address specification 34 

Length attribute 33 . 

Symbolic operands 35 



133, 165, 166 



41 



41 



73 



73 



73 



18, 20 



S' (see scaling attribute) 
Sample macro definitions 
Sample program 131 
Scale modifier 

Fixed-point constants 

Floating-point constants 
Scaling attribute 

Decimal fields 73 

Defined 73 

Fixed-point fields 

Floating-point fields 

Notation 89 

Restrictions on use 

Symbols 73 

Use of 73 
Self-defining terms 

Binary 18 

Character 19 

Decimal 18 

Hexadecimal 18 

Using 18 

(see also specific terms) 
Sequence checking 53 
Sequence symbols 17, 

AGO instruction 

AIF instruction 

ANOP instruction 

How to write 73 

Invalid examples of 

Macro instruction 

Use of 74 

Valid examples of 
Set symbols 

Assigning values to 

Defining 70 

Symbolic parameters, contrasted 

Use 70 



74 
83 
82 
84 



74 



74 



74 



70 



70 



Set symbols (continued) • 
(see also local SET symbols) 
(see also global SET symbols) 
(see also subscripted SET symbols) 
SET variable 90 
SETA instruction 

Examples of 76, 77 

Form of 75 

Operand entry of 75 

Evaluation procedure 76 
Operators allowed 75 
Parenthesized terms 76 
Terms allowed 75 
Valid examples of 75 
Operand sublist 77 
Example 77 
SETB instruction 
Example of 82 
Form of 80 

Logical expression in 81 
Arithmetic relations 81 
Blanks in 81 
Character relations 81 
Evaluation of 81 
Operators allowed 81 
Operand entry of 80 

Invalid examples of 81 
Valid examples of 81 
SETC instruction 

Apostrophes 78 
Character expressions in 78 
Ampersands 78 
Periods 78 
Concatenation in 

Character expressions 79 
Substring notations 79 
Examples of 77-80 
Form of 77 
Operand entry of 77 
Substring notations in 78 
Arithmetic expressions in 79 
Character expressions in 79 
Invalid examples of 79 
Valid examples of 79 
Type attribute in 77 
Example of 78 
SETA symbol • 

Assigning values to 70 
Defining 70 
SETA instruction 76 
Using 76 
SETB symbol 

AIF instruction 82 
Assigning values to 70 
Defining 70 
SETA instruction 82 
SETB instruction 82 
SETC instruction 82 
Using 82 
SETC symbol 

Assigning values to 70 
Defining 70 
SETA instruction 81 
Using 80 
Severity Code 144 
Severity code in MNOTE instruction 

SI machine instruction format 39 
Address specification 34 
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SI machine instruction format (continued) 

Length attribute 33 

Symbolic operands 35 
Source module 27 

Source statement library defined 59 
SPACE instruction 52 
SS machine instruction format 33 

Address specification 34 

Length attribute 33 

Length field 34 

Symbolic operands 35 
START instruction 

Positioning of 27 

Unnamed control sections 28 
Statements 11, 13 

Boundaries 11 

Examples 13 

Macro instructions 66 

Prototype 61 

Summary of 119 
Storage, defining (see DS instruction) 
S-type address constant 48 
Sublist (see operand sublist) 
Subscripted SET symbols 

Defining 90 

Dimension of 91 

Examples 91 

How to write 90 

Invalid examples of 90 

Subscript of 91 

Using 91 

Examples 91 

Valid examples of 90 
Substring notation 

Arithmetic expressions in 79 

Character expression in 79 

Concatenating 79 

How to write 79 

Invalid example of 79 

SETB instruction 81 

SETC instruction 79 

Valid examples of 79 
SYM card 151.1 

Symbol definition, EQU instruction for 38 
Symbols 

Absolute 17 

Defining 17 

Length attributes 33 
Referring to 21 

Length, maximum 18 

Ordinary 17 

Previously defined 18 

Relocatable 17 

Restrictions 18 

Sequence 17, 74 

Symbol table capacity 126 

Types of 17 

Value attributes 33 

Variable 17 
Symbolic linkages 31 

ENTRY instruction 31 
EXTRN instruction 31 



Symbolic operands formats 35 
Symbolic parameter 

Comments field 63 

Concatenation of 64 

Defined 63 

How to write 63 

Invalid examples of 63 

Model statements 63 

Prototype statement 62 

Replaced by 63 

Valid example of 63 
System variable symbols 

Assigned values by assembler 91 

Defined 91 

(see also specific system variable 
symbols) 



T' (see Type attribute) 



Tables, internal, capacity of 126 
Terms 

Expressions composed of 15 

Pairing of 22 
TITLE instruction 51 
Type attribute 

Defined 72 

Literals 72 

Macro instruction operands 72 

Notation 71 

SETC instruction 77 

Use 72 



Unconditional branch (see AGO instruction) 
Unnamed control section 28 
USING instruction 24, 33 



Variable symbols 17 

Assigning values to 59 
Defined 59 
How to write 59 
Restrictions in use to generate 



62 
125 



operation codes 
Summary chart of 
System 92, 93 
Summary chart of 
Types of 59 
Use 59 

(see also specific variable symbols) 
V-type address constant 4 8 
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XFR instruction 



Y-type address constant 
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